Use: Function LastRowInt(InWS As Worksheet) As Integer LastRowInt = InWS.UsedRange.Find(What:=”*”, After:=InWS.Cells(1, 1), Lookat:=xlPart, _ LookIn:=xlFormulas, SearchOrder:=xlByRows, SearchDirection:=xlPrevious, _ MatchCase:=False).Row End
Read moreEvery now and again I am asked what is the best method to learn VBA. On this topic here are
Read morePossibly useful to sort, order or compare lists of non-identical but related strings. [code language=”vb”] Public Function MatchingWordsInStrings(InString1 As String,
Read moreRoutine to position shapes in worksheet based on specified ranges. Note: Can use ‘print shape name‘ routine to create required
Read moreRoutine to list names of shapes in specific worksheet or current workbook. Can make adjustments here to list various shape
Read moreWhen there are a lot of hidden worksheets, making them visible one by one can be a pain. Stick this
Read moreGreat page on referencing pivot table ranges – shows the range selected for each selection method used http://www.globaliconnect.com/excel/index.php?option=com_content&view=article&id=154:referencing-an-excel-pivot-table-range-using-vba&catid=79&Itemid=475 Excel Chart
Read more
Function to return a value for a specific id from a dataset with column headers in the first row (ie
Read moreSimple PivotTable report to show basic information about PivotTables in the activework. Useful in tracking down lost PivotTables and other
Read more
The puzzle: One hundred passengers are about to board a plane. The first passenger lost his boarding pass and decides
Read more