via macro lijn toevoegen

[westra77]

ik zik een oplossing voor het volgende probleem:
ik wil graag via een maco controleren of er in bv cel a1 een getal voorkomt,
Indien hier een getal voorkomt moet hij in de cellen b2:b10 de linkerrand weergeven
indien er geen getal voorkomt moet hij deze lijn weer verwijderen.
is dit mogelijk?

alvast bedankt

 

[Joske2000]

Hi Westra,

Dit kan perfect met voorwaardelijke opmaak

Plaats in de cellen B2 tot B10 het volgende bij voorwaardelijke opmaak

=$A$1>0

Joske

 

[westra77]

ik was bezig met onderstaande macro (deze werkt echter niet)
jou oplossing werkt goed, is wist niet dat dit mogelijk was!
'
ps wat doe ik in onderstaande macro fout?

De macro is opgenomen op 13-9-2008 door jwestra.
'
Sub Macro2()
'
' Macro2 Macro

'
Range("a1").Select
With ActiveCell
If .Value > 1 Then
With Range("G10:G16").Select.Borders(xlEdgeLeft)
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = xlAutomatic
End With



End Sub

 

[Ginger]

westra77, Als je wilt testen of een cel een getal bevat, doe je dit met de functie ISNUMBER (ISGETAL). Het is beter om hier géén macro van te maken omdat de standaard functionaliteit Conditional Format (voorwaardelijke opmaak) dit al volledig voor je dekt (zoals Joske2000 ook al aangaf)!

Groet, Leo