Re: Help with creating new macro.

Tech Tip: Click here to run a free scan for Windows Errors and optimize PC performance

From: Question_123 (I_am_fitz_at_hotmail.com)
Date: 05/11/04


Date: 10 May 2004 20:24:38 -0700

I am looking for an example of the kind of macro that will copy the
first 25 rows into tab one called AAA, the next 25 into tab two called
BBB etc. I seen a similar posting that does what I want but I could
not get it to work on my particular data.

"David McRitchie" <dmcritchie@msn.com> wrote in message news:<uAKoBbtNEHA.3816@TK2MSFTNGP12.phx.gbl>...
> Doesn't line up for in proportional font or in fixed font, but I
> think this is what your are looking for.
>
> Replicate values into blank cells (#fill_empty)
> http://www.mvps.org/dmcritchie/excel/fillhand.htm#fillempty
>
> Has both nonprogramming and programming solutions. THe
> programming solution will bold the original making it easier
> to work with.
>
> Sub Fill_Empty()
> '--David McRitchie, 2003-07-24,
> '--Macro version of -- Excel -- Data Entry -- Fill Blank Cells
> 'http://www.contextures.com/xlDataEntry02.html
> 'http://www.pcworld.com/shared/printable_articles/0,1440,9346,00.html
> Dim oRng As Range
> Set oRng = Selection
> Selection.Font.Bold = True
> Selection.SpecialCells(xlCellTypeBlanks).Select
> Selection.Font.Bold = False
> Selection.FormulaR1C1 = "=R[-1]C"
> oRng.Copy
> oRng.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
> False, Transpose:=False
> End Sub
> ---
> HTH,
> David McRitchie, Microsoft MVP - Excel [site changed Nov. 2001]
> My Excel Pages: http://www.mvps.org/dmcritchie/excel/excel.htm
> Search Page: http://www.mvps.org/dmcritchie/excel/search.htm
>
> "Question_123" <I_am_fitz@hotmail.com> wrote in message news:5cedbf9d.0405101251.64609742@posting.google.com...
> > Hi group,
> > I have this CSV file. In this CSV file there are groups of related
> > information each group is 25 rows (4 rows in my example). I want to
> > create a new tab for each group with the 3 letter company number as
> > the tab title. I have tried a few things from other posts here.. but
> > I cannot get it to work, I think it can be done with macro but my
> > limited knowledge of excel im not sure if there is a better way to
> > accomplish this. Any help will be appreciated. Thanks.
> >
> > AAA 20040401 20040430 AAA Company
> > 0 0 TOTAL OPENING INVENTORY
> > 0 0 PURCHASES
> > 0 0 ADJUSTMENTS & ACCRUALS
> > BBB 20040401 20040430 BBB Company
> > 0 0 TOTAL OPENING INVENTORY
> > 0 0 PURCHASES
> > 0 0 ADJUSTMENTS & ACCRUALS
> > CCC 20040401 20040430 CCC Company
> > 0 0 TOTAL OPENING INVENTORY
> > 0 0 PURCHASES
> > 0 0 ADJUSTMENTS & ACCRUALS



Relevant Pages

  • How do I copy a worksheet from a workbook as csv file
    ... I want to record a macro that ... will save one tab, "CSV Data" as its own csv file to another location. ...
    (microsoft.public.excel.misc)
  • RE: date format in CSV
    ... I'll paste the whole MACRO here for you. ... the point before SAVING the CSV file, I manually SAVEAS test.csv and then run ... ' Format Column Q for date ... If Lastcol> 0 Then ...
    (microsoft.public.excel.programming)
  • Re: Can someone do me a favor? small script
    ... ' ConvertAdwords Macro ... column K " Keyword Destination URL" Insert into column F ... Click to Import Google AdWords CSV file ... Exit Sub ...
    (microsoft.public.excel.programming)
  • Re: Maybe Vlookup ? But.....
    ... The macro ran without hanging up, ... In the table tab, I have cellar in A2 & Tower in A3 ... Dim mySht As Worksheet ...
    (microsoft.public.excel.worksheet.functions)
  • Re: Automatically Adding a Worksheet
    ... each tab has a different number to it. ... The macro to create the tabs is correct. ... The macro to copy the template tab is correct. ... For Each myCell In myRange.Cells ...
    (microsoft.public.excel.programming)