excel macro geeft steeds fout

[Robbierob]

Wil in een macro een aantal cellen met data kopieeren in een ander werkblad. Daarbij mag hij niet over reeds bestaande bereik plakken, indien de cellen niet leeg zijn, dan moeten de cellen in de rij eronder plaatsen zie hieronder. weet iemand waar het fout gaat ?

Range("E3:U3").Select
Selection.Copy
Sheets("checklist").Select
Application.CommandBars("Stop Recording").Visible = False
Sheets("database containers").Select
Range("D3:U3").Select
Application.CutCopyMode = False
Selection.Copy
Sheets("checklist").Select
Range("B9:S9").Select
If Range("b9:S9") = "" Then Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Else GoTo row next(same columm)Then
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
End If
Sheets("database containers").Select
Range("C3").Select
Application.CutCopyMode = False
Selection.Copy
Sheets("checklist").Select
Range("P5:Q5").Select
ActiveSheet.Paste
Sheets("database containers").Select
Range("B3").Select
Application.CutCopyMode = False
Selection.Copy
Sheets("checklist").Select
Range("Q3").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Sheets("database containers").Select
Application.CutCopyMode = False
Range("E3").

 

[Haaren101]

Het is wellicht handig als je zelf effe verteld wat er fout gaat of niet lukt. Zoekt wat makkelijker

Ron

 

[Wigi]

Het is wellicht handig als je zelf effe verteld wat er fout gaat of niet lukt.

En tevens code tags gebruikt

 

[Robbierob]

Is ook wellicht handig, echt een junior member dus, in onderstaand stukje geeft de macro een compileerfout: Syntaxisfout

Else GoTo row next(same columm)Then

zonder "If stukje" doet de macro het wel, maar data wordt dan uiteraard op dezelfde regel neergezet en dus overschreven.

wellicht zo iets duidelijker ?

hoor graag, alvast dank.

 

[Wigi]

Als je in VBA gaat programmeren, moet je wel syntaxen - dus commando's - gebruiken die gekend zijn in VBA.

Else GoTo row next(same columm)Then

zegt mij niets. Volgens mij heb je de macro recorder laten werken, en dan in woorden ertussen getypt wat je graag zou hebben. Zo werkt het niet

Ik zou zeggen, houd eens een aantal topics met code in de gaten in het Excel subforum op dit forum, en steek daar wat van op. Daarna zal je zelf beter dit soort dingen kunnen aanpakken.

Wim

 

[Robbierob]

Ga ik doen, gaat heus lukken. Bedankt voor je tijd die je erin gestoken hebt.