Category Archives: VBA

Auto filter indicatie

De functionaliteit van het Auto filter in Excel is prachtig, de indicatie dat een filter actief is, is dat niet. In Excel 2003 kun je een actief filter herkennen aan het feit dat het pijltje van de keuzelijst blauw in plaats van zwart is. In Excel 2007 is daar verandering in gebracht. Een actief filter […]

Wat is VBA?

VBA staat voor Visual Basic for Applications- Applications zijn de onderdelen van de Microsoft Office-suite zoals Word, Outlook, Excel, enz. VBA is de programmeertaal achter deze toepassingen en is beschikbaar  voor de gebruikers die deze toepassingen willen aanpassen naar hun wens. Elke applicatie heeft zijn eigen variatie van VBA. Delen van VBA-programmacode worden vaak aangeduid […]

Kleuren in Excel/VBA

Een heel handig Color Picker is te vinden achter deze link Color Picker               Onderstaande link van David McRitchie brengt je naar alle kleurnummers voor VBA http://dmcritchie.mvps.org/excel/colors.htm   Sub colors56() ’57 colors, 0 to 56 Application.ScreenUpdating = False Application.Calculation = xlCalculationManual ‘pre XL97 xlManual Dim i As Long Dim str0 […]

Categories: VBA

Extracting Part Of A String

The functions, Left, Right, and Mid allow you to extract part of a cell’s entry. If cell A1 contains “ABC567DEF, then Left(Range(“A1”).Value, 3) returns “ABC” Mid(Range(“A1”).Value, 3) returns C567DEF Mid(Range(“A1”).Value, 4, 2) returns just “56”, a text string. To convert it to a number use Val(any string). Right(Range(“A1”).Value, 2) returns “EF” Mid() function The Mid() […]

Using Column Letters to Reference Cells

The function Cells(row number, column number ) can also take column letters! For example Dim X X = Cells(1,”C”).Value will return the value of cell “C1”. With this approach, you do not need to get the column number to refer to a cell.  

Finding The Last Cell, Last Row, or Last Column

Find last row, column or last cell Thanks to Ron de Bruin Copy the code in a Standard module of your workbook, if you just started with VBA see this page. Where do I paste the code that I find on the internet   Last used cell in one row or one column The macro’s […]

Convert kolom letter naar kolom nummer

If you have a column letter and want to turn it into a number, you can use the followingapproach: numberColumn = Worksheets(1).Columns(AlphaColumn).Column numberColumn = Sheets(“Blad1”).Columns(“J”).Column  Result = 10