پرسش ماکرویی بابت hide و unhide کردن

[saleh64]

سلام من میخوام وقتی تیک check Box میزنیم و به طور مثال در سلول c1 کلمه truo نوشته میشه به فرض کل ستون D, ا Hidden بشه و وقتی تیک بر میداریم ستون unhide بشه
کد زیر نوشتم ولی نمیدونم کجاش مشکل داره که اعمال نمیشه
لطفا راهنمایی کنیدممنون

Sub s()
' s Macro'

If Range("c1") = "truo" Then Columns("D:D").Select
Selection.EntireColumn.Hidden = True
else Range("c1") = "false" Then Columns("C:E").Select
Selection.EntireColumn.unHidden = True
Range("A3").Select
End If
End Sub 

[saleh64]

کسی بلد نیست راهنمایی کنه !!!؟

[مصطفی رجبی]

سلام به روش زیر کد نویسی کنید کمتر به مشکل مواجه می شید.

If Range("A1") = "True" Then

Columns("D:D").Hidden = True

Else
Columns("D:D").Hidden = False
End If