| Home |
| Search |
| Today's Posts |
|
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
copying sheet name
Sub setsheetname()
With Cells(1, WorksheetFunction.Max(Cells(1, Columns.Count).End(xlToLeft).Column + 1, 15)) .Value = ActiveSheet.Name End With End Sub go to the rightmost column, then get the END/LEFT column number and add 1, use 15 or this if its larger "oldjay" wrote in message ... I want to copy the sheet name to row 1 of the first blank column after col 15 Oldjay |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Need help Taking alot data from one sheet (if not blank) and copying toa list on another sheet. | Excel Worksheet Functions | |||
| copying a template sheet and inputting a formula into another sheetthat references the new sheet | Excel Programming | |||
| HAVE ONE REPORT SHEET WITH LINKS FROM VARIOUS SHEETS. ON COPYING THIS LINKED SHEET FOR EXPORTING IT TO THE OFFICE GET ERRORS IN CELLS. HOW TO RESOLVE THIS? | Excel Programming | |||
| Copying cells from on sheet to another sheet (via sheet module) | Excel Programming | |||
| 2 questions, copying data from sheet to sheet and assigning macro | Excel Worksheet Functions | |||
Threaded Mode
