VBA Help Needed
Closed
jetski1202
Posts
1
Registration date
Wednesday 19 April 2017
Status
Member
Last seen
19 April 2017
-
19 Apr 2017 à 08:17
TrowaD Posts 2921 Registration date Sunday 12 September 2010 Status Contributor Last seen 27 December 2022 - 24 Apr 2017 à 11:47
TrowaD Posts 2921 Registration date Sunday 12 September 2010 Status Contributor Last seen 27 December 2022 - 24 Apr 2017 à 11:47
Related:
- Excel forum vba
- Excel online vba - Guide
- Vba excel mac - Guide
- Excel vba timer - Guide
- Vba case like - Guide
- Number to words in excel formula without vba - Guide
3 responses
Place the code to prompt into the worksheet method of WORKBOOK_OPEN(). There are bunch of built in methods.
As for the other code, post back with what you have, and we can help with that. Have you looked at this link to see if any of the examples here will help?
https://ccm.net/faq/53497-how-to-manipulate-data-in-excel-using-vba
...should help with how to programmaticaly build ranges to copy.
As for the other code, post back with what you have, and we can help with that. Have you looked at this link to see if any of the examples here will help?
https://ccm.net/faq/53497-how-to-manipulate-data-in-excel-using-vba
DisqualifiedEntryText(dqstCnt) = ThisWorkbook.Worksheets("Qualifiers").Range("M" & 8 + dqstCnt).value
...should help with how to programmaticaly build ranges to copy.
TrowaD
Posts
2921
Registration date
Sunday 12 September 2010
Status
Contributor
Last seen
27 December 2022
555
20 Apr 2017 à 10:59
20 Apr 2017 à 10:59
Hi Jetski,
'But I need for the data on the "Main" sheet to always be copied to the new sheets. How do I do this?'
You probably use something like:
Instead of adding a sheet, copy your Main sheet:
Best regards,
Trowa
'But I need for the data on the "Main" sheet to always be copied to the new sheets. How do I do this?'
You probably use something like:
Worksheets.Add after:=Sheets(Sheets.Count)
ActiveSheet.Name = "NewSheet"
Instead of adding a sheet, copy your Main sheet:
Sheets("Main").Copy after:=Sheets(Sheets.Count)
ActiveSheet.Name = "NewSheet"
Best regards,
Trowa
TrowaD
Posts
2921
Registration date
Sunday 12 September 2010
Status
Contributor
Last seen
27 December 2022
555
24 Apr 2017 à 11:47
24 Apr 2017 à 11:47
hmmm, you said:
'I have written code to prompt the user to state how many new sheets they want to add.'
So I thought you already got that part covered.
Can you make ac3mark's suggestion work?
Best regards,
Trowa
'I have written code to prompt the user to state how many new sheets they want to add.'
So I thought you already got that part covered.
Can you make ac3mark's suggestion work?
Best regards,
Trowa
If I may....
Initilaze a variable and store an input. Loop the number of times the variable is. something like:
I hope this helps.
FYI, the above code CANNOT be cut and pasted into your project, as it wil not run as written. It can be quickly, and easilty made to work, you just have to define the remaining variables, and write the Routine Doyourcodehere!
Have FUN!
It's kind of fun to do the impossible! -Walter Elias Disney
Initilaze a variable and store an input. Loop the number of times the variable is. something like:
dim IntNumberOfSheets, CountofLoop
IntNumberOfSheets = InputBox("how many?", "how many?", 1, xpos, ypos)
for CountofLoop = 0 to IntNumberOfsheets - 1
Call Doyourcodehere
next
I hope this helps.
FYI, the above code CANNOT be cut and pasted into your project, as it wil not run as written. It can be quickly, and easilty made to work, you just have to define the remaining variables, and write the Routine Doyourcodehere!
Have FUN!
It's kind of fun to do the impossible! -Walter Elias Disney
