Sub SelecteerCel(Sheet As String)
Cells.Font.Bold = False
Select Case Sheet
Case "Sheet1"
Range("A11").Select
Selection.Interior.ColorIndex = 8
Case "Sheet2"
Range("B3").Select
Selection.Interior.ColorIndex = 8
Case "Sheet3"
Range("C1").Select
Selection.Interior.ColorIndex = 8
End Select
Cells.Font.Bold = True
End Sub
Zoals jullie weten helpt VBA u terwijl u code invoert. Maar als ik Range("A11").Select
had getypt en daarna de regel Selection. typte dan gaf hij geen voorstel meer ook niet
als ik de toetsencombinatie CTRL+SPATIE deed, want dan krijg je normaal het overzicht van de bibliotheek (F2) en dat doet die niet. Dus je moet vanbuiten weten wat er moet komen. Kan iemand zeggen hoe dit komt dat VBA niet altijd een voorstel geeft of de toetsencombinatie niet werkt??
Groeten, Mark.
Cells.Font.Bold = False
Select Case Sheet
Case "Sheet1"
Range("A11").Select
Selection.Interior.ColorIndex = 8
Case "Sheet2"
Range("B3").Select
Selection.Interior.ColorIndex = 8
Case "Sheet3"
Range("C1").Select
Selection.Interior.ColorIndex = 8
End Select
Cells.Font.Bold = True
End Sub
Zoals jullie weten helpt VBA u terwijl u code invoert. Maar als ik Range("A11").Select
had getypt en daarna de regel Selection. typte dan gaf hij geen voorstel meer ook niet
als ik de toetsencombinatie CTRL+SPATIE deed, want dan krijg je normaal het overzicht van de bibliotheek (F2) en dat doet die niet. Dus je moet vanbuiten weten wat er moet komen. Kan iemand zeggen hoe dit komt dat VBA niet altijd een voorstel geeft of de toetsencombinatie niet werkt??
Groeten, Mark.