kunde
Vapaa kuvaus
Käyttäjän kirjoittamat viestit
01.07.2024
Kommentoi keskusteluun: Kursorin siirto makrolla
Sub Siirry() SendKeys "{Down}" End Sub @Kunde Keep EXCELing
Tiede ja teknologia > Tietotekniikka > Ohjelmat ja sovellukset > Office-ohjelmat > Excel
11.01.2024
Vastasi keskusteluun: Numeroita sisältävien solujen siirtäminen omaan sarakkeeseensa
jos tekstit A-sarakkeessa B1 soluun matriisikaava SHIFT CTRL ENTER (tekstit) ={TEXTJOIN("";TRUE;IF(ISERROR(MID(A1;ROW(INDIRECT("1:"&LEN(A1)));1)*1);MID(A1;ROW(INDIRECT("1:"&LEN(A1)));1);""))} C1 soluun matriisikaava SHIFT CTRL ENTER (numerot) ={TEXTJOIN("";TRUE;IFERROR((MID(A1;ROW(INDIRECT("1:"&LEN(A1)));1)*1);""))}
Tiede ja teknologia > Tietotekniikka > Ohjelmat ja sovellukset > Office-ohjelmat > Excel
29.12.2023
Vastasi keskusteluun: Excelin rivien muuttaminen sarakkeiksi
jos haluat koodin laita YV https://www.dropbox.com/scl/fi/5m5zcscjfew5kbobb8sbz/Excel-rivit-sarakkeeseen.mp4
Tiede ja teknologia > Tietotekniikka > Ohjelmat ja sovellukset > Office-ohjelmat > Excel
24.11.2023
Kommentoi keskusteluun: Tietojen liittäminen exceliin, lukumuotoilu
Koodi toimii enkkuversiossa, mutta suomiversiossa pitää fiksata ... Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) Dim lastAction As String lastAction = Application.CommandBars("Standard").Controls("&Kumoa").List(1) If Left(lastAction, 5) = "Liitä" Then Application.EnableEvents
Tiede ja teknologia > Tietotekniikka > Ohjelmat ja sovellukset > Office-ohjelmat > Excel
07.04.2023
Kommentoi keskusteluun: Formatoinnin muuttaminen
aloituksessasi oli A1 = 3/6/2023 3:44:23,000 PM eli pilkku erottimena ja nyt sitten se on muuttunut pisteeksi... Ei kai mun koodi voi toimia oikein jos kerran ekana annat dataan pilkun ja teen koodin sen ukaan , joka toimii ja nyt sitten se pitääkin olla piste ja ihmettelet kun koodi ei toimi Koeta
Tiede ja teknologia > Tietotekniikka > Ohjelmat ja sovellukset > Office-ohjelmat > Excel
26.03.2023
Vastasi keskusteluun: Alueen kopiointi eri tiedostoista
Linkit ovat se viho viimeisin keino, mutta jos ei osaa muuten kopioida, niin ei kai sitten väliä, kunhan jollakin keinolla saa toimivan ratkaisun aikaan...
Tiede ja teknologia > Tietotekniikka > Ohjelmat ja sovellukset > Office-ohjelmat > Excel
26.03.2023
Kommentoi keskusteluun: Ainutkertaisten arvojen laskenta suodatetuista riveistä
Specialcellsillä on joku solumäärärajoitus, mutta en nyt muista kuinka iso se on. Kerran se on tullut vastaan ohjelmassani. Tee tuosta funktio-kaikkitarvittavat pelimerkithän siinä on.
Tiede ja teknologia > Tietotekniikka > Ohjelmat ja sovellukset > Office-ohjelmat > Excel
26.03.2023
Kommentoi keskusteluun: Ainutkertaisten arvojen laskenta suodatetuista riveistä
Turhaa luuppaamista. Oletetaan , että dataa olisi vaikka 1000 riviä ja suodatuksen tuloksena tulisi 10 riviä, jolloin ylläoleva koodi tekee 990 turhaa ja ylimmääräistä luuppia, toisin kuin alleoleva koodi tekee vain tarvittavat10 luuppia... Sub LaskeUniikit() Dim Solu As Range Dim vika As Long vika
Tiede ja teknologia > Tietotekniikka > Ohjelmat ja sovellukset > Office-ohjelmat > Excel
09.03.2023
Kommentoi keskusteluun: Formatoinnin muuttaminen
Käsittely tehdään Excelissä. Data tulee leikepöydältä html-muodossa... Kun olet noin taitava, kerro ihmeessä , miten se tehdään liitettäessä leikepöydältä
Tiede ja teknologia > Tietotekniikka > Ohjelmat ja sovellukset > Office-ohjelmat > Excel
09.03.2023
Kommentoi keskusteluun: Formatoinnin muuttaminen
Mitä tarkoitat - Osaatko sanoa, miksi Excel ei reagoi muutettuun formatointiin?
Tiede ja teknologia > Tietotekniikka > Ohjelmat ja sovellukset > Office-ohjelmat > Excel
09.03.2023
Kommentoi keskusteluun: Formatoinnin muuttaminen
tavalliseen moduuliin... Sub MuutaPäiväys() Dim vika As Long Dim solu As Range Application.DisplayAlerts = False On Error Resume Next Sheets("Huuhaa").Delete Sheets.Add.Name = "Huuhaa" On Error GoTo 0 'muuta taulukon nimi jasarake sopivaksi nya A-sarake=1 vika = Worksheets("Taul1").Cells(Rows.Count,
Tiede ja teknologia > Tietotekniikka > Ohjelmat ja sovellukset > Office-ohjelmat > Excel
15.02.2023
Vastasi keskusteluun: Mac osoite
tavalliseen moduuliin... Function TekeeMAC(ByVal MAC As String) As String Dim i As Long For i = Len(MAC) - 2 To 2 Step -2 MAC = Left(MAC, i) & ":" & Mid(MAC, i 1) Next TekeeMAC = MAC End Function Voit käyttää funktiota solussa tyyliin =TekeeMAC(I4) Keep EXCELing @Kunde
Tiede ja teknologia > Tietotekniikka > Ohjelmat ja sovellukset > Office-ohjelmat > Excel
18.09.2022
Kommentoi keskusteluun: Kaavan arvon "pakkosyöttö"
Kuten sanoin, räätälöinti helppoa... ;-)
Tiede ja teknologia > Tietotekniikka > Ohjelmat ja sovellukset > Office-ohjelmat > Excel
16.09.2022
Vastasi keskusteluun: Kaavan arvon "pakkosyöttö"
Tuossa nyt tosi simppeli makro (oli käytössä videolinkissäni aiemmin) soluhin E3 ja G3 syötetään tietoja ja vastaussolussa F4 summataan ne. Vaihtaa vastaussolun väriä sen mukaan onko solussa kaava vai ei ja palauttaa originaali kaavan jos solun tyhjentää tai E3 tai G3 solujen arvo muuttuu. Tosta
Tiede ja teknologia > Tietotekniikka > Ohjelmat ja sovellukset > Office-ohjelmat > Excel
16.09.2022
Kommentoi keskusteluun: Kaavan arvon "pakkosyöttö"
Nuo makrothan toimii samoin kuin normikaavatkin eli voit jossitella yms ihan normitapaan, mutta EXCEL4 makrot pitää olla tehtynä nimiin tai sitten MacroSheetille.koko proseduuri Kandee tsekata youtubesta missä ainakin tää hemmo niitä esittelee(useampikin video) https://www.youtube.com/watch?v=b1S4UJ
Tiede ja teknologia > Tietotekniikka > Ohjelmat ja sovellukset > Office-ohjelmat > Excel
15.09.2022
Kommentoi keskusteluun: Kaavan arvon "pakkosyöttö"
kokeile absoluutisella viittauksilla, nyt tsekkaa solua F5 =NOUDA.SOLU(48;!$F$5) =NOUDA.SOLU(48;!F5)
Tiede ja teknologia > Tietotekniikka > Ohjelmat ja sovellukset > Office-ohjelmat > Excel
15.09.2022
Kommentoi keskusteluun: Kaavan arvon "pakkosyöttö"
Itsellä EXCEl 2021 ja siinä vaihdoin kielen suomeksi ja enkkuvesion rc ainakin piti muuttaa rs, jotta toimi suomiversiossa. Kandee ekana kokeilla enkkuversiolla ja tallentaa ja sitten muuttaa kielen suomeksi ja testailee. Dokumentaatio on vähissä, mutta 1990- luvulla noilla mentiin aika pitkällekin
Tiede ja teknologia > Tietotekniikka > Ohjelmat ja sovellukset > Office-ohjelmat > Excel
14.09.2022
Kommentoi keskusteluun: Kaavan arvon "pakkosyöttö"
Luulo ei ole tiedon väärti... moduuliin funktio Function OnkoKaava(Solu As Range) As Boolean OnkoKaava = Solu.HasFormula End Function ja jos tsekataan esim. onko solussa D4 kaava niin vastaussoluun kaava =OnkoKaava(D4) Keep EXCELing @Kunde
Tiede ja teknologia > Tietotekniikka > Ohjelmat ja sovellukset > Office-ohjelmat > Excel
14.09.2022
Kommentoi keskusteluun: Kaavan arvon "pakkosyöttö"
Käyttää enkkuversion funktionimiä suomiversiossa... suomiversiossa viittaus =NOUDA.SOLU(48;SIIRTYMÄ(EPÄSUORA("rs";EPÄTOSI);0;-1)) Keep EXCELing @Kunde
Tiede ja teknologia > Tietotekniikka > Ohjelmat ja sovellukset > Office-ohjelmat > Excel
14.09.2022
Kommentoi keskusteluun: Kaavan arvon "pakkosyöttö"
Katso linkittämäni video, siinä näet miten juurikin GET.CELL funktiota käytin tutkimaan, onko solussa kaava vai ei. Kuten jo aiemmassa postauksessa mainitsin, pitää tietää miten noita funktioita käytetään. Toki VBA:lla voi aivan hyvin tehdä ton paljon yksinkertaisemmin (xxx.HasFormula), mutta noilla
Tiede ja teknologia > Tietotekniikka > Ohjelmat ja sovellukset > Office-ohjelmat > Excel