BY CATEGORY▼
VBA CATEGORIES▼
- Excel VBA - Basics (23)
- VBA User Forms (21)
- Excel VBA - pivot tables (8)
- Excel VBA - charts (6)
- VBA - advanced (13)
- VBA - working with files (10)
- VBA - linking applications (9)
- VBA - working with Outlook (13)
- Built-in VBA functions (9)
- VBA - working with data (36)
- VBA - scraping websites (17)
- VBA - working with shapes (3)
- VBA - classes and structures (6)
EXCEL VBA - BASICS VIDEOS▼
- Excel VBA Part 1 - The VB Editor
- Excel VBA Part 2 - Writing Your First Macro
- Excel VBA Part 3 - What To Do When Things Go Wrong
- Excel VBA Part 4 - Buttons, Toolbars and Keyboard Shortcuts
- Excel VBA Part 5 - Selecting Cells
- Excel VBA Part 6 - Worksheets, Charts and Sheets
- Excel VBA Part 7 - Working with Workbooks
- Excel VBA Part 8 - Variables in VBA
- Excel VBA Part 9 - Object Variables
- Excel VBA Part 10 - Message Boxes
- Excel VBA Part 11 - Input Boxes
- Excel VBA Part 11a - Application.InputBox
- Excel VBA Part 12 - With Statements
- Excel VBA Part 13.1 - If Statements in VBA
- Excel VBA Part 14.1- Select Case Statements
- Excel VBA Part 15.1 - Do Until and Do While Loops
- Excel VBA Part 16 - For Next Loops
- Excel VBA Part 17 - For Each Loops
- Excel VBA Part 18 - Creating Functions
- Excel VBA Part 19 - Error Handling
- Excel VBA Part 20 - Event Procedures
- Excel VBA Part 21 - User Forms
- Why do we write If Not Is Nothing in Excel VBA?
Excel VBA - Basics videos | Excel VBA Part 6 - Worksheets, Charts and Sheets
Posted by Andrew Gould on 09 November 2013
In order to navigate a workbook using VBA it's essential to understand how to refer to, activate and select the various types of sheet. This video explains the difference between worksheet, chart and sheet objects and also demonstrates how to select, copy, move, delete and rename them. You'll also see how to change the visibility of the sheets in a workbook, including how to make sheets not just hidden, but VERY hidden!
There are no files which go with this video.
Making a video bigger
You can increase the size of your video to make it fill the screen like this:
Play your video (the icons shown won't appear until you do), then click on the full screen icon which appears as shown at its bottom right-hand corner.
When you've finished viewing a video in full screen mode, just press the Esc key to return to normal view.
Improving the quality of a video
To improve the quality of a video, first click on the Settings icon:
Make sure you're playing your video so that the icons shown appear, then click on this gear icon at the bottom right-hand corner.
Choose to change the video quality:
Click on Quality as shown to bring up the submenu.
The higher the number you choose, the better will be your video quality (but the slower the connection speed):
Don't choose the HD option unless you have a fast enough connection speed to support it!
Is your Wise Owl speaking too slowly (or too quickly)? You can also use the Settings menu above to change your playback speed.
Hi,
I was wondering, can I apply a property to all selected worksheets when I am in a group mode? For example below the property interior color is applied only to Sheet 1 even if I have selected 2 worksheets. Why is that?
Sub SelectWorksheetsAndApplyProperty()
Worksheets("Sheet1").Select
Worksheets("Sheet3").Select
Selection.Range("a1:a5").Interior.Color = rgbBlue
End Sub
Thanks in advance for the answer.
The word Selection refers to the currently selected cells. To achieve what you're trying to, you should actually miss this out. To amend the same range on lots of sheets at the same time, use something like this:
Sheets(Array("Sheet1", "Sheet3")).Select
Range("A1:A5").Interior.Color = vbGreen
Sorry to bother, but I run the macro you mention and does not do the job. It applies the property only in Sheet1 were it supposed to apply the property in both Sheets1 and Sheet3
Hmmm ... you are so right! I should have tested it better. Further investigation suggests that you can't do this; instead, you'd need to loop over the worksheets that you want to alter, making the same change to each. For example, this code would definitely worked (I've tested it properly this time):
Sub ColourSheets()
Dim ws As Worksheet
'loop over each of the worksheets of interest
For Each ws In Sheets(Array("Sheet1", "Sheet3"))
'change this worksheet's colour for top few cells
ws.Range("A1:A5").Interior.Color = vbYellow
Next ws
End Sub