VBA Code Examples
In Depth Tutorials	yes
PowerPoint VBA Macro Examples & Tutorial
Sorting
Find and Find and Replace
Cheat Sheets – Commands & Syntax Lists
Word Macro Examples & VBA Tutorial

Basics	yes
If, ElseIf, Else (Ultimate Guide to If Statements)
Value Paste & PasteSpecial
VBA – Cut, Copy, Paste from a Macro
VBA Save File – 20 Easy Examples

VBA Coding Concepts	yes
Commenting in VBA
Creating (Custom) User Defined Functions (UDFs)
Excel VBA – Named Ranges and Programming
How to Rename or Delete a Module or Form
Opening & Using the Visual Basic Editor (VBE) in Excel
Return a Value from a Sub Procedure
Shortcuts for the Visual Basic Editor
Call Function from a Sub
Function – Call, Return Value, & Parameters
Object Model
On Error – Error Handling Best Practices
Private vs Public Procedures (Subs & Functions)
Select Case Statement
Sub Procedure
What is a VBA Module?
What is a VBA Project? (And How to Edit)
VBA – Hide a Macro
VBA – Language References
VBA – Modify the Right-Click Menu to Call a Macro
VBA – Run a Macro from a Macro
VBA – Run a Macro Line by Line
VBA – Wait, Delay, Create a Timer While Running Code
Debug.Print and Immediate Window
VBA DoEvents
VBA End
VBA Exit Sub or Function
VBA On Error Exit Sub
VBA Option Explicit
VBA: Improve Speed & Other Best Practices

Loops	yes
VBA For Loop – Loop Through a Range of Cells
Loops - Ultimate Guide
For Each Examples (Quick Reference)
VBA Exit For
VBA Exit Loop
While Wend Loop

Ranges and Cells	yes
Ranges and Cells - Ultimate Guide
Formulas - Ultimate Guide
Union and Intersect
Resize Range
VBA – Autofill with a Macro
VBA – Change a Cell;s Background Color
VBA – ClearFormats – Remove Formatting For Each Cell In Range
VBA – Conditional Formatting – Highlight Duplicates in a Range
VBA – Delete All Named Ranges
VBA – Delete Hyperlinks
VBA – Determine Start and End Column of a Merged Cell
VBA – Excel’s Color Scheme
VBA – Find the Maximum Value For Each Column in a Range
VBA – Format Painter
VBA – Get the Active Cell’s Column or Row
VBA – Resize an Object to a Range Size
VBA – Select All Cells
VBA – Sum by Color
VBA – Test if Selection is a Range or Object
Cell Value – Get, Set, or Change
ClearContents / Clear Cells
Copy Destination (Copy Range to Another Sheet)
Current Region
Dynamic Range
VBA Function – Populating a Range With Random Values
Highlight Cell
VBA Merge Cells & Unmerge Cells
Offset Range or Cell
Range / Cell Address
Range.End (xlDown, xlUp, xlToRight, xlToLeft)
VBA Routine to return Column Letter of Cell
VBA Select Range or Cells
VBA Union – Join Multiple Ranges
VBA Wrap Text
Activecell Offset VBA

Rows & Columns	yes
Select (and work with) Entire Rows & Columns
Delete or Insert Rows Based on Cell Value
Delete Rows that Meet Certain Criteria in VBA
Hide / Unhide Columns & Rows
Unhide All Rows / Columns
VBA – Autofit Columns
VBA – Count the rows in a Selection
VBA – Delete Blank Rows
VBA – Select Every 5th Row
VBA – Select Non Contiguous Columns
Copy / Paste Rows & Columns
Delete Entire Row or Column
Group Rows & Columns
Insert Row or Column
VBA Set Column Width or Row Height
VBA Used Range – Count Number of Used Rows or Columns

Sheets	yes
Sheets – The Ultimate Guide
VBA – Count the Sheets in a Workbook
VBA – Create a Hyperlink Menu of Worksheets
VBA – Hide (or Unhide) a Worksheet
VBA – Hide WorkSheet Tabs
VBA – How to Use Worksheet Functions (and a Full List)
VBA – Loop Through all Worksheets with For Each
VBA – Macro to List all Sheets in a Workbook
Send Worksheets by Email as Separate Workbooks
VBA – Sort Sheets Alphabetically
VBA – Unhide All Worksheets
Clear Entire Sheet
VBA Copy Worksheet
VBA Delete or Clear Worksheet
Get Sheet Name / Rename Sheet
VBA Protect / Unprotect Worksheets
VBA Routine to Add and Name Worksheets
VBA Select Sheet, Activate Sheet, and Get Activesheet
Worksheet Range
VBA: Set the Default Sheet When a WorkBook Opens
How to Sort Tabs / Worksheets with a VBA Macro

Workbooks	yes
Combine Workbooks
Create New Workbook (Workbooks.Add)
Activate Workbook
ActiveWorkbook vs. ThisWorkbook
VBA Open / Close Workbook
Workbook Name (Get, Set, without Extension)
Workbook Protection (Password Protect / Unprotect)
Working with Workbooks (The Workbook Object)

Arrays	yes
Arrays
VBA – Array Examples
Dictionary Objects
Collections
ArrayList
Array of Objects
Variant Array
Dynamic Array (Redim & Redim Preserve)
Declare & Initilize String Array
Declare (Dim), Create, and Initialize Array Variable
Array Length / Size
Assign Range to Array
Clear Array – Erase Function
Loop Through Array / For Each Item in Array
Sort Array
Transpose Array
Search for (Find) Value in Array
Populate Array with Unique Values from Column
Remove Duplicates From Array
Function Return Array
Multi-Dimensional Array (2D Arrays)
Output (Print) Array to Range

Errors	yes
Try Catch Errors
Object Required Error
Syntax Error VBA
Type Mismatch (Run-time Error 13)
Automation Error
Compile Error
Error 1004 – Application-Defined or Object-Defined Error
Ignore Error
On Error Resume Next or Goto 0
Out of Memory Error
Throw / Raise Error – Err.Raise – Custom Error Msg
Can’t Find Project or Library – VBA Compile Error
Compile Error in Hidden Module – VBA
Fix Error 400
Fix VBA Error 438 – Object Doesn’t Support Property or Method
Fix VBA Run Time Error 32809
Fix VBA Run Time Error 57121

Variables	yes
Dim VBA – Declare Variable
VBA – Determine a Variable’s Underlying Type
VBA Array Variables
Boolean Data Type (Dim Variable)
Constant
VBA Constant Expression Required
VBA Data Types – Variables and Constants
VBA Date Variable
Double Data Type (Dim Variable)
VBA Global Variable
Int / Integer Data Type (Dim Variable)
Long Data Type (Dim Variable)
VBA Public Variable – Use a Variable in Multiple Modules or Subs
VBA Range Object Variables (Dim / Set Range)
Set Object Variables – Workbooks, Worksheets, & More
Single Data Type (Dim Variable)
VBA Static Variable
String Data Type (Dim Variable)
Variant Data Type (Dim Variable)

Settings	yes
Get and Change User Name with VBA
VBA – Display Status Bar Message
VBA – Modify the titlebar
VBA – Prevent warning messages from a macro
VBA – Turn Automatic Calculations Off (or On)
VBA – Turn Formula Bar Off (or On)
VBA – Turn off Screen Updating
VBA Turn Scroll Bars On or Off

Text and Strings	yes
Split String into Cells
Prevent VBA Case Sensitive – Option Compare Text
VBA – Extract Number From String
VBA – Find the nth Word in a String of Text
VBA – Force Proper, Upper, or Lower case automatically
VBA – Line Break or Line Feed in a Message Box
VBA – Loop Through a String
VBA – Remove Characters from Left or Right Side of Variable Length String
VBA – Reverse a String of Text
VBA Char / Chr Function
VBA Compare Strings – StrComp
VBA Comparison Operators – Not Equal to & More
VBA Concatenate Text Strings Together (& – Ampersand)
Convert Integer (Number) to String
Convert String to Date
Convert Text String to Number
VBA Function To Calculate Number of Words in a String
VBA INSTR – Find Text in a String
VBA Like Operator
VBA Logical Operators – OR, AND, XOR, NOT, IS, & LIKE
VBA New Line / Carriage Return
Parse String
VBA Space Function – Add Spaces to a String
VBA Strings and Substrings Functions
Text to Columns
Trim, LTrim, and RTrim Functions – Remove Spaces From Text
VBA Upper, Lower, and Proper Case – Case Functions

View	yes
VBA – ActiveWindow.WindowState
VBA – Display (or Exit) Fullscreen
VBA – Freeze Panes
VBA – Hide Excel (The Entire Application)
VBA – Page Break Preview Mode On or Off
VBA – Scroll Vertically and Scroll Horizontally
VBA – Zoom – Fit Selection
VBA – Zoom in and Out of Worksheets

Files	yes
FileSystem Object
Move Files with VBA FileSystemObject (MoveFile)
VBA – Convert Excel to CSV (Comma Delimited Text File)
Create Text File with CreateTextFile
VBA – Delete files from the hard drive
VBA – Export Range to CSV (Delimited Text File)
Import File Names to Clickable Links
VBA – List of all files contained within a Directory
Read Text File into String
Read Text File Line by Line
VBA – Test if Workbook is Open by Workbook Name
Validate Filenames
Write to Text File
VBA Check if File or Folder Exists
Combine Multiple Excel Files into One Workbook
Copy a Folder with CopyFolder (FSO)
VBA Copy File / Workbook
VBA Delete File / Workbook
Delete Folder with DeleteFolder (FSO)
FileCopy Statement
Get File Name with GetFileName (FSO)
GetFolder & GetFile (Get File & Folder Properties)
VBA List Files in Folder
VBA Open File Dialog Box
Open Text File with OpenTextFile
Read Text File (Read, Parse, and Import)
VBA Rename File

Shapes, Charts, Objects	yes
VBA AutoFilter
VBA Guide For Charts and Graphs
VBA Guide to Pivot Tables
VBA Objects
Excel Add VBA Button
How to use VBA Controls in UserForms
VBA – Create a Bar Chart
VBA – Delete All Autoshapes
VBA – Programmatically Draw Boxes with Code
Listbox – Selected Item
VBA Tables and ListObjects
TextBox

Formatting	yes
Conditional Formatting
Bold
Cell Borders
Cell Font – Change Color, Size, Style, & More
Center Text – Cell Alignment (Horizontal & Vertical)
Display Page Breaks Setting
Format Cells
Format Date
Format Time

Events	yes
Events
VBA – Exit Without Save Prompt
VBA – Force a Workbook to Save Before Close
VBA – Run a Macro when Excel Closes – Auto_Close
VBA – Run a macro when Excel starts
VBA Worksheet Change Event – Run a Macro When a Cell Changes
VBA: Show or load a form when Excel starts

UserForms, MsgBoxes & Controls	yes
VBA – Make Userform Transparent
VBA – Yes No Message Box (Msgbox)
VBA InputBox – Get Input from a User
Creating VBA Userforms
Option Button Excel VBA
Spin button Excel VBA
VBA Checkbox
VBA ComboBox
VBA Listbox
VBA Open or Close UserForm

Formatting	yes
Conditional Formatting
Bold
Cell Borders
Cell Font – Change Color, Size, Style, & More
Center Text – Cell Alignment (Horizontal & Vertical)
Display Page Breaks Setting
Format Cells
Format Date
Format Time

Misc.	yes
Clear Clipboard
Pause (Break / Stop) & Resume a Macro
Save As (Print) to PDF
ColorIndex Codes List
Format Numbers
How to Install (or Uninstall) a VBA add-in (.xlam file) for Microsoft Excel
How to use VBA Structures
Removing Duplicate Values in Excel VBA
Speed up your VBA Code
VBA – Add or Remove Cell Comments
All Operators Explained
Build a Custom Import Interface
Check if Office App is Running
Dialog Box
Get Today’s Date (Current Date)
Pivot Table Filter
Refresh Pivot Table / All Pivot Tables
Refresh Pivot Table when Data Changes
Using Goal Seek in VBA
Using the Analysis ToolPak in VBA
Advanced Filter
Application.CutCopyMode = False
Calculate – Now, Workbook, Worksheet, or Range
Call / Run Sub From another Subroutine
Copy to Clipboard
Find Value in Column
GoTo a Line Label
IIF Function
Input Statement
is Nothing
Is Operator
Line Input Statement
Multiple (Nested) If Statements
Project Password / Protect code
Reference
Solver
Wait & Sleep Functions – Pause / Delay Code
Wildcards
With / End With Statement
What is the Difference Between VB and VBA?
Personal Macro Workbook
VBA – Check Spelling
VBA – Turn Off AutoFilter / Clear Filters
VBA Drop Down List (Data Validation)
VBA Hyperlinks
VBA Random Number

Functions	yes
Check if Sheet and/or Range Exists Function
Environ Function – Excel VBA
IsEmpty Function
Using Isnumeric and Isnumber in VBA
VBA – Compare Dates
Abs Function
AVERAGE, AVERAGEA, AVERAGEIF
CCur Function
CDbl Function – Convert to Double
CDec Function
ChDir Statement
ChDrive Statement
CInt Function – Convert to Integer
CLng Function – Convert Expression to Long
CLngLng Function
Close Statement
COUNT Function
COUNTIF and COUNTIFS Functions
CreateObject (Create Object)
CSng Function
CurDir Function
VBA Date Functions
DateAdd Function
DateDiff Function
DatePart Function
DateSerial Function
DateValue Function
Day Function
Dir Function
Environ Functions
EOF Function
FileDateTime Function
Filter Arrays
Format Function
FreeFile Function
VBA Function to Show Cell Formula
Functions List
GetAttr Function
Hex Function
Hour Function
InStrRev Function – Find Text From Right
IsArray Function
IsDate Function
IsEmpty Function
IsError Function
IsMissing Function
IsNull Function
IsNumeric Function
Join Function
LBound Function
Left Function – Extract Text From Left
Len Function – Get String Length
LOF Function
Log Function
MacID Function
Mid Function – Extract Characters From Middle of String
Minute Function
MkDir Statement
Month Function
MonthName Function
Now Function – Get Current Date & Time
Open Statement
Print Statement
Randomize Statement
Replace Function – Replace String
Right Function – Extract Text From Right
Rnd Function
Round Function
Round, RoundUp, and RoundDown
Second Function
Split Function – Split String of Text into Array
Sqr Function
Sum Function (Ranges, Columns, & More)
SUMIF and SUMIFS Functions
Switch Statement
Text Function
Time Function
Time Functions
Timer Function
TimeSerial Function
TimeValue Function
TypeName
TypeOf
UBound & LBound Functions
Val Function
VarType
Weekday Function
WeekdayName Function
Write Statement
Year Function
Vlookup – Multiple Results with VBA
Vlookup Multiple Criteria with VBA UDF

Advanced Programming	yes
Advanced VBA Programming Examples
Early Late Binding
Class Constructor
Class Module Tutorial & Examples
Matrix – Create & More
Shell
VBA – Convert Matrix to Vector
VBA – Programming the VBE (Visual Basic Editor)
VBA Regex
VBA SendKeys
VBA Timer Function

Internet	yes
Automate Internet Explorer (IE) Using VBA
VBA – Consume Soap Web Services
VBA – WinHttpRequest with Login and Password – Misc Bloglines
Send Emails from Excel through Gmail
Send Emails from Excel through Outlook

Access	yes
Access VBA Recordsets – Open, Count, Loop and More
Access VBA – Import / Export Excel – Query, Report, Table, and Forms
Access VBA – Open / Close Form
Access VBA – Open Excel File
Access VBA Database – Open, Connect, Login, & More
Access VBA Findfirst
Access VBA Me
Access VBA Query
Access VBA Recordsets – Open, Count, Loop and More
Access VBA Refresh Form
Access VBA Reports – Print, Export, Filter
Access VBA SQL Examples
Access VBA Tables – Update, Count, Delete, Create, Rename, Export

Word	yes
Word Bookmarks – VBA Macros to Add, Delete, Goto, Modify
Word VBA – Macro to Open Word Document
Word VBA Macros – Add New Document
Word VBA Macros – Count Words in Selection
Word VBA Macros – Find, Find & Replace
Word VBA Macros – SaveAs (PDF or New File Name)
Word VBA Macros – Tables: Add, Select, Loop, Insert From Excel
Word VBA Macros – Templates (Make New)
Word VBA Macros – TextBox: Add, Delete, Write
Other Excel Guides
"How To" Guides
"Formulas" Guides
"Shortcuts" Guides
VBA Guides

VBA Cell Borders

In this Article

Formatting Borders

This tutorial will show how to adjust cell border settings in VBA.

Formatting Borders

Top Border – Double Line

First let’s look at an example of how to set a blue, thick, doubled top border to the cell B3 on Sheet1: example border

Sub ExampleSetBorder()

 With Worksheets("Sheet1").Range("B3").Borders(xlEdgeTop)
  .LineStyle = xlDouble
  .Weight = xlThick
  .ColorIndex = 5
 End With

End Sub

Notice we use a With Statement to simplify our coding.

We access the the top border with .Borders(xlEdgeTop).

Other Cell Borders

Instead you can access other borders, including diagonals:

Worksheets("Sheet1").Range("B2").Borders(xlEdgeTop).Color = RGB(128, 0, 0)
Worksheets("Sheet1").Range("B2").Borders(xlEdgeRight).Color = RGB(0, 255, 0)
Worksheets("Sheet1").Range("B2").Borders(xlEdgeBottom).Color = RGB(0, 0, 128)
Worksheets("Sheet1").Range("B2").Borders(xlEdgeLeft).Color = RGB(255, 0, 0)
Worksheets("Sheet1").Range("B2").Borders(xlDiagonalDown).Color = RGB(0, 0, 0)
Worksheets("Sheet1").Range("B2").Borders(xlDiagonalUp).Color = RGB(0, 0, 0)

border example2

Inside Borders

You can also adjust horizontal (xlInsideHorizontal) and vertical (xlInsideVertical) borders for all cells in a range:

With Worksheets("Sheet1").Range("B2:C6").Borders(xlInsideHorizontal)
 .LineStyle = xlDashDotDot
 .Weight = xlMedium
 .ColorIndex = 3
End With

inside horizontal borders

LineStyle

The LineStyle property can be changed to xlContinuous, xlDot, xlDash, xlDashDot, xlDashDotDot, xlDouble, xlSlantDashDot and xlLineStyleNone.

The Weight property can be either xlHariline, xlThin, xlMedium and xlThick. You will have this result with the code below:

Worksheets("Sheet1").Range("C3").Borders(xlEdgeTop).Weight = xlHairline
Worksheets("Sheet1").Range("C3").Borders(xlEdgeBottom).Weight = xlHairline
Worksheets("Sheet1").Range("D3").Borders(xlEdgeTop).Weight = xlThin
Worksheets("Sheet1").Range("D3").Borders(xlEdgeBottom).Weight = xlThin
Worksheets("Sheet1").Range("E3").Borders(xlEdgeTop).Weight = xlMedium
Worksheets("Sheet1").Range("E3").Borders(xlEdgeBottom).Weight = xlMedium
Worksheets("Sheet1").Range("F3").Borders(xlEdgeTop).Weight = xlThick
Worksheets("Sheet1").Range("F3").Borders(xlEdgeBottom).Weight = xlThick

border weight

Border colors can be set as ColorIndex or Color (RGB, serial number or vbColor). See more information about color settings here.

You can add borders around a range with a one-line command as well:

Range("B5:C7").BorderAround LineStyle:=xlContinuous, Weight:=xlThick, Color:=vbRed

VBA Coding Made Easy

Stop searching for VBA code online. Learn more about AutoMacro - A VBA Code Builder that allows beginners to code procedures from scratch with minimal coding knowledge and with many time-saving features for all users!