• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Loopeinde

Status
Niet open voor verdere reacties.

thijsvn

Gebruiker
Lid geworden
6 mrt 2009
Berichten
25
hallo allemaal,

sind gister ben ik bezig een macro te maken voor mijn stagebedrijf. Het betreft hier een excel document met verschillende gelockte en niet gelockte cellen.
wat er moet gebeuren is dat alle niet gelockte cellen leeggemaakt moeten worden.

wat ik tot nu toe had gemaakt is het volgende:

Code:
Range("A1").Select
  Do
  
    If ActiveCell.Value > 0 Then
    ActiveCell.ClearContents
    ActiveCell.Next.Activate
    Else: ActiveCell.Next.Activate
    End If
  
  Loop Until ActiveCell.Formula = "end"

End Sub

wat ik eigenlijk zou willen is dat deze routine automatisch stopt als hij een cell tegenkomt die hij al een keer heeft leeggemaakt. of dat hij info haalt uit de cell die je handmatig selecteerd en dan stopt als hij deze cell tegenkomt.

is dit een beetje duidelijk dan wel mogelijk?

alvast bedankt,

thijs
 
Dus gaat deze dicht.
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan