RoVo1211
Gebruiker
- Lid geworden
- 24 feb 2024
- Berichten
- 69
- Besturingssysteem
- Windows 11
- Office versie
- Office 365
De gegevens hieronder zijn niet fictief, maar zijn niet te herleiden tot personen.
Verklaring van gegevens:
NTL=Nationale Trioleague
3137 = teamnummer
2e divisie A (oneven rij) = Huidige poule
Bowling P-H Medemblik = Team naam
BV Medemblik = Bowlingvereniging
75 = nummer van bowlingverening bij Nederlandse Bowling Federatie (NBF)
7e plaats (even rij) = rangschikking vorig seizoen
1e divisie A (even rij) = poule vorig seizoen.
Van NTL t/m nr bowlingver. bij NBF (75 in dit voorbeeld) staan allemaal in een cel en wil graag verdeeld zien over 6 kolommen en de gegevens over vorig seizoen (in de even rijen) daarachter in de kolommen G en H. Dus totaal 8 kolommen.
Hoe kan ik met een macro deze gegevens over kolommen verdelen.
Ik was zelf al begonnen om de gegevens over vorig seizoen met een macro te verplaatsen naar 1 rij hoger zodat ze achter de gegevens van het huidige seizoen komen te staan.
Daarvoor had ik de volgende macro geschreven, maar daar krijg de foutmelding dat de typen niet overeenkomen.
Ik zal wel wat over het hoofd gezien hebben, maar kan iemand mij helpen om het goed te krijgen.
De macro die ik had geschreven is:
Graag een oplossing.
NTL 3137 2e Divisie A GrandCafé Hofplein Leiderdorp BV Leiden Zuid-West 73 |
Kampioen 3e Divisie A |
NTL 3255 2e Divisie A Bowling P-H Medemblik BV Medemblik 75 |
7e plaats 1e Divisie A |
NTL 3372 2e Divisie A Team Carriere BV Medemblik 75 |
6e plaats 2e Divisie A |
NTL 3377 2e Divisie A Maxime's Pro Shop BV Den Helder 170 |
3e plaats 2e Divisie A |
Verklaring van gegevens:
NTL=Nationale Trioleague
3137 = teamnummer
2e divisie A (oneven rij) = Huidige poule
Bowling P-H Medemblik = Team naam
BV Medemblik = Bowlingvereniging
75 = nummer van bowlingverening bij Nederlandse Bowling Federatie (NBF)
7e plaats (even rij) = rangschikking vorig seizoen
1e divisie A (even rij) = poule vorig seizoen.
Van NTL t/m nr bowlingver. bij NBF (75 in dit voorbeeld) staan allemaal in een cel en wil graag verdeeld zien over 6 kolommen en de gegevens over vorig seizoen (in de even rijen) daarachter in de kolommen G en H. Dus totaal 8 kolommen.
Hoe kan ik met een macro deze gegevens over kolommen verdelen.
Ik was zelf al begonnen om de gegevens over vorig seizoen met een macro te verplaatsen naar 1 rij hoger zodat ze achter de gegevens van het huidige seizoen komen te staan.
Daarvoor had ik de volgende macro geschreven, maar daar krijg de foutmelding dat de typen niet overeenkomen.
Ik zal wel wat over het hoofd gezien hebben, maar kan iemand mij helpen om het goed te krijgen.
De macro die ik had geschreven is:
Code:
Sub VorigSeizoen()
Dim row As Long, column As Long
If ActiveCell.Rows Mod 2 = 0 Then
ActiveCell.Move
ActiveCell.Offset(-1, 9).PasteSpecial Paste:=xlAll
End If
End Sub
Graag een oplossing.