Get more info about an IP address or domain name, such as organization, abuse contacts and geolocation.
One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.
NumRows = Application.InputBox("How many rows do you wish to add?", Type:=1) UpperBound = NumRows 'Display if user chooses Cancel button If NumRows = False Then MsgBox "Add function cancelled", vbInformation Application.EnableEvents = True Exit Sub End If 'Add number of rows specified lastRow = findLastRows For counter = 1 To UpperBound Rows(lastRow + 1).Select Selection.Insert shift:=xlDown lastRow = lastRow + 1 newRow = Rows(lastRow).Row ReDim Preserve AddNewRowArray(UpperBound) AddNewRowArray(counter) = newRow Rows(lastRow - 1).Copy Rows(newRow).PasteSpecial _ Paste:=xlPasteFormats Next counter
|combine fist two words in a cell||2||24|
|I need help with an EXCEL Nested formula.||5||24|
|Set the row height to autofit in all workshets and increase that height by 4 points (by means of VBA)||9||31|
|Copy cell contents for multiple columns and put into a comment for a cell in another column||8||12|