Display Worksheet Data Quickly and Easily

How to display specific worksheet data quickly and easily using option buttons with VBA. Often we can divide our Excel worksheet into regions with different headings. These headers hold different types of useful data like purchases, sales, returns and stock in hand. This concept of having data in the same worksheet makes calculations and data analysis easier. However, to display the data or view the data we may have to scroll left and right and this can be irritating. Using option buttons or shape tabs we can display the required data quickly and easily at a comfortable position on the worksheet. Watch the video below:

Watch this video on YouTube.

Here’s the complete VBA code to view worksheet data quickly:

Option Explicit

Private Sub OptionButton1_Click()
Application.ScreenUpdating = False

Columns("A:B").Hidden = True
Columns("C:J").Hidden = False
Columns("K:AN").Hidden = True
Range("C6").Select

Application.ScreenUpdating = True

End Sub

Private Sub OptionButton2_Click()
Application.ScreenUpdating = False

Columns("A:L").Hidden = True
Columns("M:T").Hidden = False
Columns("U:AN").Hidden = True
Range("M8").Select

Application.ScreenUpdating = True

End Sub

Private Sub OptionButton3_Click()
Application.ScreenUpdating = False

Columns("A:V").Hidden = True
Columns("W:AD").Hidden = False
Columns("AE:AO").Hidden = True
Range("W8").Select

Application.ScreenUpdating = True

End Sub

Private Sub OptionButton4_Click()
Application.ScreenUpdating = False

Columns("A:AF").Hidden = True
Columns("AG:AO").Hidden = False
Range("AG6").Select

Application.ScreenUpdating = True

End Sub

Private Sub OptionButton5_Click()
Application.ScreenUpdating = False
Columns().Hidden = False
Range(“A1”).Select
Application.ScreenUpdating = True

End Sub