Op deze website gebruiken we cookies om content en advertenties te personaliseren, om functies voor social media te bieden en om ons websiteverkeer te analyseren. Ook delen we informatie over uw gebruik van onze site met onze partners voor social media, adverteren en analyse. Deze partners kunnen deze gegevens combineren met andere informatie die u aan ze heeft verstrekt of die ze hebben verzameld op basis van uw gebruik van hun services. Meer informatie.

Akkoord

Vraag & Antwoord

Programmeren

excel vba vraag

[size=9:888b3e3dd6]zoekweek = InputBox("test") If zoekweek > 52 Then GoTo verkeerdekeuze Range("weekgerardstart").Select Do ActiveCell.Offset(1, 0).Select If zoekweek = ActiveCell.Value Then Exit Do Loop ActiveCell.Select Exit Sub verkeerdekeuze: MsgBox "kies een weeknummer dat lager is dan 52, opnieuw" End Sub [/size:888b3e3dd6] via bovenstaande code selecteer ik een cel. rechts van deze cel wil ik andere cellen selecteren en knippen/copieren. dit lukte me altijd via deze code. Range(adres, Range(adres).End(xlToRight)). cut waarbij adres vanuit een select case benoemd wordt. echter [color=red:888b3e3dd6]adres[/color:888b3e3dd6] is nu dus veranderlijk en dan werkt de code niet!! wie helpt me verder? activecell invullen i.p.v. adres werkt niet, krijg een global range error. [color=#][/color]

hvkessel