macro

[F.Meulbroek]

Beste forummers,

Ik heb nog een vraagje voor jullie.
Ik heb in een spreadsheet een aantal maattabellen staan ( S M L XL) en wil die via een macro laten invoegen op de plaats van de cursor. Als ik de macro maak dan krijg ik telkens de maten op de plaats natuurlijk waar ik hem in de macro heb gemaakt, wat doe ik fout. Ik zal een voorbeeldje bijvoegen.
Groetjes

 

[Superzeeuw]

Hallo Frans,

Waar jij de gegevens wilt plaatsen die cel zul je eerst actief moeten maken.

Voorbeeld bijgevoegd

Met een aantal aanpassingen moet het lukken

Groeten

 

[F.Meulbroek]

tof

bedankt voor je reactie, ik ga ermee aan de slag
groetjes

 

[jpvs]

Probeer dit eens :

zie bijlage

Pierre

 

[F.Meulbroek]

Bedankt

hallo Pierre,

Bedankt voor je reactie, werkt zoals ik het bedoel tenminste, alleen moet ik me eens verdiepen in hoe de macro nu werkelijk is gemaakt omdat ik ook nog andere maatseries nodig heb waar ik dan weer macro's voor wil maken.

Groetjes Frans

 

[jpvs]

Het plaatst de formule in een actieve cel, gebruik makend van de R1C1 notatie.
Zet de cursor in FormulaR1C1 en druk op F1 voor meer info.

Hierbij nog 2 voorbeelden:

Vb

Sub NaarRechts()
ActiveCell.Offset(1, 0).Value = "Thuisploeg"
ActiveCell.Offset(1, 1).Value = "Uitploeg"
ActiveCell.Offset(1, 2).Value = "Voor"
ActiveCell.Offset(1, 3).Value = "Tegen"
End Sub
Sub NaarOnder()
ActiveCell.Offset(0, 0).Value = "Thuisploeg"
ActiveCell.Offset(1, 0).Value = "Uitploeg"
ActiveCell.Offset(2, 0).Value = "Voor"
ActiveCell.Offset(3, 0).Value = "Tegen"
End Sub

Pierre