kolom verschuiven

[henkjan90]

Helaas ben ik niet zo thuis in Visual Basic, maar ik begrijp het wel gedeeltelijk omdat ik ooit in een ver verleden met PHP heb gewerkt. Vandaar mijn vraag.

Ik had al één en ander gevonden op dit forum over mijn onderwerp, maar dat was niet helemaal waar ik naar op zoek was en helaas ben ik zelf niet in staat om het dusdanig aan te passen dat het wel aan mijn eisen voldoet.

Ik heb een lijst met cijfers. Deze moeten worden gekopieerd naar een kolom door middel van een button en een macro. Dat lukt nog wel, maar als er nogmaals op de knop wordt geklikt moeten dezelfde cijfers naar de kolom ernaast worden verplaatst. Hoe maak ik dat in VB?

Tevens wil ik het ook proberen om aan de hand van een bepaalde maand de cijfers in een bepaalde kolom te plaatsen. Dus indien er in cel A1 11 staat (november) moet het bijvoorbeeld naar kolom 20.


Bij voorbaat dank!

Henkjan

 

[Ginger]

Henkjan90, Dit zou een oplossing kunnen zijn.

Sub ff()

    ActiveCell.EntireColumn.Insert shift:=xlShiftToRight

End Sub

Links van de kolom waar je met je cursor staat wordt een kolom tussengevoegd. Hierdoor schuift je kolom dus 1 plek op.

Groet, Leo

 

[Cobbe]

Voor het een en ander wat te verduidelijken zou het handig zijn om een voorbeeldje bij de hand te hebben.

Cobbe