xnumber

Sub Create() Dim i As Long Dim xNumber As Integer Dim xName As String Dim xActiveSheet As Worksheet On Error Resume Next Application.ScreenUpdating = False Set xActiveSheet = ActiveSheet xNumber = InputBox("ENTER NUMBER OF TIMES TO COPY THE CURRENT SHEET") For...

The below code will allow me to type the number of times to copy a sheet. Dim I As Long Dim xNumber As Integer Dim xName As String Dim xActiveSheet As Worksheet On Error Resume Next Application.ScreenUpdating = False Set xActiveSheet = ActiveSheet xNumber =...

Hi I want to improve the code below so if a user entered a wrong name, then vba will give error message. I tried with IfError() as below but got error message. Thank you so much. Sub mylookup() Dim xname As String Dim xnumber As Integer xname = InputBox("name") xnumber =...

I have a workbook that I want the worksheets to auto name with the date and copy the conditional formatting to the next worksheet. My problem is that the name of the worksheet isn't naming correctly but the conditional formatting is working. I have two macros. I am not sure if the second macro...

Hi Guys. I have workbook that has numbered sheets in the format 001|002|003 etc... I am trying write some VBA to duplicate the last sheet, formulas included, and continue the numbering of the sheets in the same format. For example, the user has 30 sheets (001 - 030) and adds a new sheet. the...