Print side | Luk vindue

Hjælp til VBA kode

Udskrevet fra: Dansk Regneark Forum
Kategori: Hjælp til regneark.
Forum navn: Makro og VBA
Forum beskrivelse: Hjælp til Makroer og VBA-programmering
Web-adresse: https://forum.excel-regneark.dk/forum_posts.asp?TID=134
Udskrevet den: 19.Apr.2025 kl. 11:31


Emne: Hjælp til VBA kode
Besked fra: Karsten
Emne: Hjælp til VBA kode
Posteringsdato: 14.Nov.2010 kl. 14:56

Jeg har et lille problem som jeg ikke kan lige kan finde løsningen på.

I celle A1 står værdien 2
I celle A2 står værdien 5
I celle A3 står værdien 3

Disse værdier er dynamiske, så de kan ændres af brugeren

Nu ønkser jeg at konverterer værdierne fra de ovenstående eksempler
til en række af tal og denne række kunne være række 5.

 

Opgaven går ud på at få celle A5:B5 til at være værdien 1 og celle
C5:G5 til at have værdien 2, celle H5:J5 til at være 3

Eksempel:
Række 5
1122222333

Hvis værdien i f.eks. celle A2 ændres til 10 skal rækken se ud som
eksempel herunder.

112222222222333

 
Jeg bruger Excel 2007

Er der nogen der kan hjælpe

På forhånd tak

mvh.
Karsten



Svar:
Besked fra: Allan
Posteringsdato: 14.Nov.2010 kl. 21:36
Hej Karsten,
 
Jeg tror at denne kode kan klare din udfordring
Lad os se om det virker. Wink
 
Sub TalTilKolonne()
Raekke = 5
Range(Cells(Raekke, 1), Cells(5, Range("A1"))).Value = 1
Range(Cells(Raekke, Range("A1") + 1), Cells(Raekke, Range("A1") + Range("A2"))).Value = 2
Range(Cells(Raekke, Range("A1") + Range("A2") + 1), Cells(Raekke, Range("A1") + Range("A2") + Range("A3"))).Value = 3
End Sub
//Allan


Print side | Luk vindue