Macro kan alleen uitgevoerd worden in een bepaalde range.

Status
Niet open voor verdere reacties.

RGMeijers

Verenigingslid
Lid geworden
9 mei 2013
Berichten
20
Dames, heren,

Als ik een cel activeer in een (voorbestemde) range, mag/kan de macro pas uitgevoerd worden.
Hoe laat ik in de macro weten wat die range is?
Dit alles zodat niet per ongeluk andere cellen ingevuld gaan worden.

Erik
 

Bijlagen

  • VoorbeeldHelpmij.xlsm
    14,8 KB · Weergaven: 25
Test deze eens
Code:
Sub Channel7L()
For Each cl In Range("C3:C12")
If cl.Address = ActiveCell.Address Then ActiveCell.FormulaR1C1 = "Ch. 7 (L)"
 
Next

  
    Range("A1").Select
End Sub
 
Hallo Jean-Paul,

Heel....heel snel dit antwoord zeg. En het werkt prima.
Was even zoeken hoe ik hem moest inpassen in de macro omdat jij het moest hebben van een voorbeeld.

Hartelijk dank,
Erik
 
Kan ook zonder lusje.

Code:
Sub VenA()
  If Not Intersect(Range("C3:C12"), ActiveCell) Is Nothing Then ActiveCell = "Ch. 7 (L)"
End Sub
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan