border in macro? Free Excel Macros (VBA) | Excel Programs

Copy Macro

'For online Excel courses click: https://www.excelsizeyeter.com/excelwithkenan.com/udemy_giris.php 
 
Sub TestRng()
Dim rng As Range
Set rng = Range("A2:b4")  'Excel macro test code
'Note iRow = Start Row of Range and iRow2= Ending Row of Range
'Set rng = oXLApp.Range(Cells(iRow, 1), oXLApp.Cells(iRow2,1).End(xlToRight))
grid rng
End Sub

Sub grid(rng)
    rng.Select
    Selection.Borders(xlDiagonalDown).LineStyle = xlNone
    Selection.Borders(xlDiagonalUp).LineStyle = xlNone
    With Selection.Borders(xlEdgeLeft)
        .LineStyle = xlContinuous
        .Weight = xlThin
        .ColorIndex = xlAutomatic
    End With
    With Selection.Borders(xlEdgeTop)
        .LineStyle = xlContinuous
        .Weight = xlThin
        .ColorIndex = xlAutomatic
    End With
    With Selection.Borders(xlEdgeBottom)
        .LineStyle = xlContinuous
        .Weight = xlThin
        .ColorIndex = xlAutomatic
    End With
    With Selection.Borders(xlEdgeRight)
        .LineStyle = xlContinuous
        .Weight = xlThin
        .ColorIndex = xlAutomatic
    End With
    With Selection.Borders(xlInsideVertical)
        .LineStyle = xlContinuous
        .Weight = xlThin
        .ColorIndex = xlAutomatic
    End With
    With Selection.Borders(xlInsideHorizontal)
        .LineStyle = xlContinuous
        .Weight = xlThin
        .ColorIndex = xlAutomatic
    End With
End Sub

No	Macro Name
1	border in macro?
2	Apply a1: h1 to other sheet / pages
3	excel operators hk
4	Border to 3D cell
5	Frame column a with cells
6	collects selected fields in status bar
7	summer adds months to sheet / pages
8	specifies in detail how many references the book contains (on new sheet / page)
9	list formulas on new sheet / page
10	specifies in detail how many formulas are in the book (on new sheet / page)
11	inserts months as sheet / pages Specifies days in detail
12	border window
13	border Dialog Window
14	Tab order Dialog Window
15	Open a new worksheet with a name entered in textbox1
16	visual and beautiful userform
17	find and copy and paste in macro
18	get rows in ascending order
19	draw borders across cells2
20	show you all the hidden sheet / pages in order to show you the message?

Excel Free Macros (VBA)

Border İn Macro?

Online Excel Courses

Services

How can we help you?

Subscribe to our Youtube Channel?

Keywords