Guru's
Ik wil mezelf wat VB aanleren, maar loop alweer tegen de eerste problemen aan
Wat ik wil; Ik heb in kolom A waarden staan en in kolom B ook, alleen soms is er een cel in kolom B <leeg>. Als dat zo is, dan wil ik dat de waarde uit kolom A (zelfde regel) naar die lege cel in Kolom B wordt gekopieerd.
En dan wil ik ook nog eens graag dat die macro blijft lopen totdat er in Kolom A (dus niet B) de waarde <leeg> wordt gevonden.
Ik heb hetvolgende gemaakt en dat werkt voor één cel, maar niet voor een range en ik weet zeker dat hij ook niet loopt.
Iemand een idee...?
===================================================
Sub COPY_PASTE_RUN()
'
' COPY_PASTE_RUN Macro
' De macro is opgenomen op 2-3-2010 door Joost Goudriaan.
'
'
If Range("B1") = "" Then
Range("A1").Select
Selection.Copy
Range("B1").Select
ActiveSheet.Paste
End If
End Sub
======================================================
Muchos Gracias!
Mvrg,
J. Goudriaan
Ik wil mezelf wat VB aanleren, maar loop alweer tegen de eerste problemen aan

Wat ik wil; Ik heb in kolom A waarden staan en in kolom B ook, alleen soms is er een cel in kolom B <leeg>. Als dat zo is, dan wil ik dat de waarde uit kolom A (zelfde regel) naar die lege cel in Kolom B wordt gekopieerd.
En dan wil ik ook nog eens graag dat die macro blijft lopen totdat er in Kolom A (dus niet B) de waarde <leeg> wordt gevonden.
Ik heb hetvolgende gemaakt en dat werkt voor één cel, maar niet voor een range en ik weet zeker dat hij ook niet loopt.
Iemand een idee...?
===================================================
Sub COPY_PASTE_RUN()
'
' COPY_PASTE_RUN Macro
' De macro is opgenomen op 2-3-2010 door Joost Goudriaan.
'
'
If Range("B1") = "" Then
Range("A1").Select
Selection.Copy
Range("B1").Select
ActiveSheet.Paste
End If
End Sub
======================================================
Muchos Gracias!
Mvrg,
J. Goudriaan