recentpopularlog in

jccalhoun : excel   20

Excel VBA Delete Columns that don't contain
Option Explicit Public Sub DeleteColumns() Dim iLastCol As Long Dim iForeColor As Long Dim iBackColor As Long Dim iPtr As Long If Selection.Cells.Count > 1 Then Exit Sub iForeColor = Selection.Font.Color iBackColor = Selection.Interior.Color iLastCol = Cells(1, Columns.Count).End(xlToLeft).Column For iPtr = iLastCol To 1 Step -1 If Cells(1, iPtr).Font.Color = iForeColor Then If Cells(1, iPtr).Interior.Color = iBackColor Then Columns(iPtr).Delete Shift:=xlToLeft End If End If Next iPt...
excel 
february 2019 by jccalhoun
How to delete rows based on background color in Excel?
Sub DeleteRows() 'Updateby Extendoffice 20161116 Dim rngCl As Range Dim xRows As Long Dim xCol As Long Dim colorLg As Long On Error Resume Next Set rngCl = Application.InputBox _ (Prompt:="Select a cell with the background color to be deleted", _ Title:="Kutools for Excel", Type:=8) On Error GoTo 0 If rngCl Is Nothing Then MsgBox "User cancelled operation." & vbCrLf & _ "Processing terminated", vbInformation, "Kutools for Excel" Exit Sub End If colorLg = rngCl.Interior.Color Applicat...
excel 
february 2019 by jccalhoun
How to delete rows not containing certain text in Excel?
Sharing Useful Tips and Professional Tutorials for Using Excel and Handy Excel Add-ins: KAutools for Excel.
excel 
april 2017 by jccalhoun

Copy this bookmark:





to read