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.
Private Sub CommandButton1_Click() Dim iRow As Long Dim ws As Worksheet Set ws = Worksheets("GENERAL") 'find first empty row in database iRow = ws.Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Row 'check for a Name number If Trim(Me.textbox_name.Value) = "" Then Me.textbox_name.SetFocus MsgBox "Please complete the form" Exit Sub End If 'copy the data to the database ws.Cells(iRow, 3).Value = Me.textbox_name.Value MsgBox "Data added", vbOKOnly + vbInformation, "Data Added" 'clear the data Me.textbox_name.Value = "" Me.textbox_name.SetFocus End Sub Private Sub CommandButton2_Click() Unload Me End Sub
|Set WorkSheet not Working||9||44|
|HOW CAN I TRANSFER AN COLUMN DATA TO ROW FOR ANALYSIS||7||29|
|Add checkboxes based on table column||10||34|
|Autopopulate field as Yes or No based on whether date in previous column is past a specific date||21||5|