Olisi hakusessa makro joka lisäisi rivin aina kun päiväys vaihtuu, Taulukossa on on reilu tuhat riviä, joissa tietoa samalla päivällä voi olla yhdestä kymmeneen riviä. Haluaisin makron joka lisäisi rivin aina kun päiväys vaihtuu.
Rivin lisääminen kun päiväys vaihtuu
6
64
Vastaukset
Sub Tsekkaapäiväykset()
Dim vika As Long
vika = Range("A65536").End(xlUp).Row
For i = vika To 2 Step -1
'¨muuta sarake oikeaksi 1= A-sarake, 2=B-sarake jne.
If Cells(i - 1, 1).Value <> Cells(i, 1).Value Then
Cells(i, 1).Insert
End If
Next i
End Sub
Keep EXCELing
@Kunde- tietoa_haluava
Mitä pitäisi muuttaa, että lisäisi koko rivin, kun nyt siirtää sarakkeeen soluja alaspäin
- enoosaavba
http://analysistabs.com/excel-vba/insert-rows-worksheet/
En tiedä auttaisiko entirerow lisääminen
Cells(i, 1).EntireRow.Insert - enosaavba
enoosaavba kirjoitti:
http://analysistabs.com/excel-vba/insert-rows-worksheet/
En tiedä auttaisiko entirerow lisääminen
Cells(i, 1).EntireRow.InsertEi mene noin. sorry.
Juuri noin, kuten enosaavba kirjoittaa...
Sub Tsekkaapäiväykset()
Dim vika As Long
vika = Range("A65536").End(xlUp).Row
For i = vika To 2 Step -1
'¨muuta sarake oikeaksi 1= A-sarake, 2=B-sarake jne.
If Cells(i - 1, 1).Value <> Cells(i, 1).Value Then
Cells(i, 1).EntireRow.Insert
'Cells(i, 1).Insert
End If
Next i
End Sub
Keep EXCELing
@Kunde
- tietoa_haluava
Kiitos!
Hienosti toimii
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
- 636233
Tappo Kokkolassa
Päivitetty tänään Iltalehti 17.04.2024 Klo: 15:23..Mikähän tämä tapaus nyt sitten taas on.? Henkirikos Kokkolassa on tap253986Miksi tytöt feikkavat saaneensa orgasmin, vaikka eivät ole saaneet?
Eräs ideologia itsepintaisesti väittää, että miehet haluavat työntää kikkelinsä vaikka oksanreikään, mutta tämä väite ei2622397Poliisit vaikenee ja paikallinen lehti
Poliisit vaikenee ja paikallinen lehti ei kerro taposta taaskaan mitään. Mitä hyötyä on koko paikallislehdestä kun ei261940MAKEN REMPAT
Tietääkö kukaan missä tämmöisen firman pyörittäjä majailee? Jäi pojalla hommat pahasti kesken ja rahat muisti ottaa enna261403- 951306
Itämaisesta filosofiasta kiinnostuneille
Itämaisesta filosofiasta kiinnostuneille. Nämä linkit voivat auttaa pääsemään niin sanotusti alkuun. https://keskustel3041087Kuntoutus osasto Ähtärin tk vuode osasto suljetaan
5 viikkoa ja mihin työntekijät, mihin potilaat. Mikon sairaalan lopetukset saivat nyt jatkoa. Alavudelle Liisalle tulee541050Välillä käy mielessä
olisiko sittenkin ollut parempi, että emme koskaan olisi edes tavanneet. Olisi säästynyt monilta kyyneleiltä.77996Mulla on kyllä
Järkyttävä ikävä sua. Enkä yhtään tykkää tästä olotilastani. Levoton olo. Ja vähän pelottaa..39971