Sub IncrementPrintNum() Dim xCount As Variant Dim xScreen As Boolean Dim I As Long Dim xStr As String Dim xInt As Integer On Error Resume Next xStr Company- prefix text xInt 2291 number LInput: xCount Application.InputBox(Please enter the number of copies you want to print:, Kutools for Excel) If TypeName(xCount) Boolean Then Exit Sub If (xCount ) Or (Not IsNumeric(xCount)) Or (xCount Please try it, hope it can help you Reply To post as a guest, your comment is unpublished.That means when I print the second copy, the number will be increased to Company-002 automatically, the third copy, the number will be Company-003one hundred copy, the number will be Company-100.
Auto Increment Number In Excel 2013 Code Auto IncrementIs there any trick to solve this problem in Excel quickly and possibly Auto increment cell value after each printing with VBA code Auto increment cell value after each printing with VBA code Normally, there is no direct way for you to solve this task in Excel, but, here, I will create a VBA code to deal with it.
Hold down the ALT F11 keys to open the Microsoft Visual Basic for Applications window. Click Insert Module, and paste the following code in the Module Window. VBA code: Auto increment cell value after each printing: Sub IncrementPrint(). Then press F5 key to run this code, and a prompt box is popped out to remind you enter the number of copies that you want to print the current worksheet, see screenshot: 4. Click OK button, and your current worksheet is printing now, and at the same time, the printed worksheets are numbered Company-001, Company-002, Company-003in cell A1 as you need. Note: In the above code, the cell A1 will be inserted the sequence numbers that you ordered, and the original cell value in A1 will be cleared. And Company-00 is the sequence number, you can change them to your need. The Best Office Productivity Tools Kutools for Excel Solves Most of Your Problems, and Increases Your Productivity by 80 Reuse: Quickly insert complex formulas, charts and anything that you have used before; Encrypt Cells with password; Create Mailing List and send emails. Super Formula Bar (easily edit multiple lines of text and formula); Reading Layout (easily read and edit large numbers of cells); Paste to Filtered Range. Merge CellsRowsColumns without losing Data; Split Cells Content; Combine Duplicate RowsColumns. Select Duplicate or Unique Rows; Select Blank Rows (all cells are empty); Super Find and Fuzzy Find in Many Workbooks; Random Select. Exact Copy Multiple Cells without changing formula reference; Auto Create References to Multiple Sheets; Insert Bullets, Check Boxes and more. Extract Text, Add Text, Remove by Position, Remove Space; Create and Print Paging Subtotals; Convert Between Cells Content and Comments. Super Filter (save and apply filter schemes to other sheets); Advanced Sort by monthweekday, frequency and more; Special Filter by bold, italic. Combine Workbooks and WorkSheets; Merge Tables based on key columns; Split Data into Multiple Sheets; Batch Convert xls, xlsx and PDF. Open and create multiple documents in new tabs of the same window, rather than in new windows. Free Download. Purchase. Comments Login Sort by Newest Best Popular Newest Oldest Say something here. Nadia 1 months ago Is it also possible to add to this code, so that 2 copies are automatically printed Reply To post as a guest, your comment is unpublished. Great I am not a programmer but i managed to change the Cell ref and the uniq numbering i wanted. Worked superb for me God bless you Reply To post as a guest, your comment is unpublished. Auto Increment Number In Excel 2013 How To Make ATBOne 1 years ago I was wondering how to make a small change so that it prints 1 of 10, 2 of 10, 3 of 10, etc. Ib Alsa 1 years ago Is there a way to select what values I want to print for example I printed sequence 1 to 30 but need to reprint sequence 15 to 19 again. How do I print every 5th,10, when needed Reply To post as a guest, your comment is unpublished. Arash 1 years ago Thanks a million Reply To post as a guest, your comment is unpublished.
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |