Kopieeren van waarden tabel

  • Onderwerp starter Onderwerp starter lab4
  • Startdatum Startdatum
Status
Niet open voor verdere reacties.
L

lab4

Gebruiker
Lid geworden
14 okt 2004
Berichten
207
Ik wil het volgende doen: ik heb in een tabel de volgende situatie

recordwaarde1waarde2etc
1 aardappel tomaat bla
2
3
4 witte kool olijven enz.
5
6
7
 
Hello

het kortste dat ik het krijg is zo:

Code: 
Sub doorvoeren()
Dim c As Range, rngToDo As Range
Set rngToDo = Range("A1:A20").SpecialCells(xlCellTypeBlanks) 'verander de Range("A1:A20") in de range die jij wil doen

For Each c In rngToDo
    c = c.End(xlUp)
Next
End Sub

Je moet nog 1 ding veranderen en klaar is Kees.

Wigi
 
Ik ben niet helemaal duidelijk geweest, het gaat om Access :(
 
Jammer, maar bedankt voor je hulp.

Iemand anders mischien?
 
Status
Niet open voor verdere reacties.
                    Steun ons                    

Nieuwste berichten

Terug
Bovenaan Onderaan