MSGROUPS.NET | Search | Post Question | Groups | Stream | About | Register

Any way to pretty this up?

  • Follow


I am trying to copy data from "Engine Data" and paste it into a new sheet.  
Engine Data contains many columns of FG_HC... I only want the one under the 
[Hertz] heading.  The format of the Engine Data looks like the following:

[Mode]
FG_NOX  FG_HC  FG_CO
data         data      data

[Hertz]
FG_NOX  FG_HC  FG_CO
data         data      data

etc


Here is my code:

    Sheets("Engine Data").Select
    Cells.Find(What:="[Hertz]", After:=ActiveCell, LookIn:=xlFormulas, _
        LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
        MatchCase:=False, SearchFormat:=False).Activate
    ActiveCell.Range("A2", Range("A2").End(xlToRight)).Select
    Selection.Find(What:="FG_HC", After:=ActiveCell, LookIn:=xlFormulas, _
        LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
        MatchCase:=False, SearchFormat:=False).Activate
    ActiveCell.Select
    Range(Selection, Selection.End(xlDown)).Copy
    Sheets("MFCs").Select
    Range("F10").Select
    ActiveSheet.Paste
    ActiveWorkbook.Names.Add Name:="FG_HC", RefersToR1C1:="=MFCs!R13C6:R" & 
LastRow & "C"


It's not pretty and I have to do this 11 times with different FG species.  
(CO, HC, NO, etc.)

Any help would be appreciated!
Thanks,
Matt
0
Reply Utf 1/3/2010 3:45:01 PM 

      If desired, send your file to my address below. I will only look if:
      1. You send a copy of this message on an inserted sheet
      2. You give me the newsgroup and the subject line
      3. You send a clear explanation of what you want
      4. You send before/after examples and expected results.


-- 
Don Guillett
Microsoft MVP Excel
SalesAid Software
dguillett1@austin.rr.com
"Matt S" <MattS@discussions.microsoft.com> wrote in message 
news:38CA4ED8-2544-4E56-B60B-9700999821B6@microsoft.com...
>I am trying to copy data from "Engine Data" and paste it into a new sheet.
> Engine Data contains many columns of FG_HC... I only want the one under 
> the
> [Hertz] heading.  The format of the Engine Data looks like the following:
>
> [Mode]
> FG_NOX  FG_HC  FG_CO
> data         data      data
>
> [Hertz]
> FG_NOX  FG_HC  FG_CO
> data         data      data
>
> etc
>
>
> Here is my code:
>
>    Sheets("Engine Data").Select
>    Cells.Find(What:="[Hertz]", After:=ActiveCell, LookIn:=xlFormulas, _
>        LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
>        MatchCase:=False, SearchFormat:=False).Activate
>    ActiveCell.Range("A2", Range("A2").End(xlToRight)).Select
>    Selection.Find(What:="FG_HC", After:=ActiveCell, LookIn:=xlFormulas, _
>        LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
>        MatchCase:=False, SearchFormat:=False).Activate
>    ActiveCell.Select
>    Range(Selection, Selection.End(xlDown)).Copy
>    Sheets("MFCs").Select
>    Range("F10").Select
>    ActiveSheet.Paste
>    ActiveWorkbook.Names.Add Name:="FG_HC", RefersToR1C1:="=MFCs!R13C6:R" &
> LastRow & "C"
>
>
> It's not pretty and I have to do this 11 times with different FG species.
> (CO, HC, NO, etc.)
>
> Any help would be appreciated!
> Thanks,
> Matt
0
Reply Don 1/3/2010 5:58:33 PM 


maybe something like this, but you don't give enough information to actually 
complete the code, (like where you discern the lastrow from). but have a look 
and maybe you can complete it on your own:


Option Explicit
Sub test()
      Dim arr As Variant
      Dim rngfound As Range
      Dim itmfound As Range
      Dim i As Long
      Dim lastrow As Long
      arr = Array("FG_HC", "CO", "HC", "NO")

      With Sheets("Engine Data")
            Set rngfound = .Cells.Find(What:="[Hertz]", After:=ActiveCell, 
LookIn:=xlFormulas, _
                LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, 
MatchCase:=False, _
                SearchFormat:=False)

            If Not rngfound Is Nothing Then
                  For i = LBound(arr) To UBound(arr)
                        With .Range(rngfound.Address, 
..Range(rngfound.Address).End(xlToRight))

                              Set itmfound = .Find(What:=arr(i), 
After:=ActiveCell, _
                                  LookIn:=xlFormulas, LookAt:=xlPart, 
SearchOrder:=xlByRows, _
                                  SearchDirection:=xlNext, MatchCase:=False, _
                                  SearchFormat:=False).Activate
                        End With
                        .Range(rngfound.Address, 
..Range(rngfound.Address).End(xlToRight)).Copy
                        Sheets("MFCs").Range("F10").PasteSpecial xlPasteAll
                        ActiveWorkbook.Names.Add Name:="FG_HC", 
RefersToR1C1:="=MFCs!R13C6:R" & _
                            lastrow & "C"
                  Next
            End If
      End With
End Sub
-- 


Gary Keramidas
Excel 2003


"Matt S" <MattS@discussions.microsoft.com> wrote in message 
news:38CA4ED8-2544-4E56-B60B-9700999821B6@microsoft.com...
>I am trying to copy data from "Engine Data" and paste it into a new sheet.
> Engine Data contains many columns of FG_HC... I only want the one under the
> [Hertz] heading.  The format of the Engine Data looks like the following:
>
> [Mode]
> FG_NOX  FG_HC  FG_CO
> data         data      data
>
> [Hertz]
> FG_NOX  FG_HC  FG_CO
> data         data      data
>
> etc
>
>
> Here is my code:
>
>    Sheets("Engine Data").Select
>    Cells.Find(What:="[Hertz]", After:=ActiveCell, LookIn:=xlFormulas, _
>        LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
>        MatchCase:=False, SearchFormat:=False).Activate
>    ActiveCell.Range("A2", Range("A2").End(xlToRight)).Select
>    Selection.Find(What:="FG_HC", After:=ActiveCell, LookIn:=xlFormulas, _
>        LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
>        MatchCase:=False, SearchFormat:=False).Activate
>    ActiveCell.Select
>    Range(Selection, Selection.End(xlDown)).Copy
>    Sheets("MFCs").Select
>    Range("F10").Select
>    ActiveSheet.Paste
>    ActiveWorkbook.Names.Add Name:="FG_HC", RefersToR1C1:="=MFCs!R13C6:R" &
> LastRow & "C"
>
>
> It's not pretty and I have to do this 11 times with different FG species.
> (CO, HC, NO, etc.)
>
> Any help would be appreciated!
> Thanks,
> Matt
0
Reply Gary 1/3/2010 6:26:46 PM 

 Don and Gary thanks so much.  I probably gave more information than needed 
and also made the post too broad.  I was more looking for a syntax cleaning.  
This is what I have so far in my attempts to clean it up... I'm stuck on the 
last part where I define the final pasted range as a name.  Don I will not be 
able to send you the file.  It's got too much classified information in it.  
Here is what I have so far:

    Sheets("Engine Data").Select
    Cells.Find(What:="[Hertz]").Activate
    ActiveCell.Range("A2", Range("A2").End(xlToRight)).Find 
What:="FG_HC").Activate
    Range(Selection, Selection.End(xlDown)).Copy 
Destination:=Sheets("MFCs").Range("F10")

'It works up to this point perfectly... then the following line doesn't work 
out.  I'm trying to get rid of the LastRow reference.

    ActiveWorkbook.Names.Add Name:="FG_HC", 
RefersTo:=Sheets("MFCs").ActiveCell.Range  'how do I do this refers to?

Thanks,
Matt

"Don Guillett" wrote:

>       If desired, send your file to my address below. I will only look if:
>       1. You send a copy of this message on an inserted sheet
>       2. You give me the newsgroup and the subject line
>       3. You send a clear explanation of what you want
>       4. You send before/after examples and expected results.
> 
> 
> -- 
> Don Guillett
> Microsoft MVP Excel
> SalesAid Software
> dguillett1@austin.rr.com
> "Matt S" <MattS@discussions.microsoft.com> wrote in message 
> news:38CA4ED8-2544-4E56-B60B-9700999821B6@microsoft.com...
> >I am trying to copy data from "Engine Data" and paste it into a new sheet.
> > Engine Data contains many columns of FG_HC... I only want the one under 
> > the
> > [Hertz] heading.  The format of the Engine Data looks like the following:
> >
> > [Mode]
> > FG_NOX  FG_HC  FG_CO
> > data         data      data
> >
> > [Hertz]
> > FG_NOX  FG_HC  FG_CO
> > data         data      data
> >
> > etc
> >
> >
> > Here is my code:
> >
> >    Sheets("Engine Data").Select
> >    Cells.Find(What:="[Hertz]", After:=ActiveCell, LookIn:=xlFormulas, _
> >        LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
> >        MatchCase:=False, SearchFormat:=False).Activate
> >    ActiveCell.Range("A2", Range("A2").End(xlToRight)).Select
> >    Selection.Find(What:="FG_HC", After:=ActiveCell, LookIn:=xlFormulas, _
> >        LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
> >        MatchCase:=False, SearchFormat:=False).Activate
> >    ActiveCell.Select
> >    Range(Selection, Selection.End(xlDown)).Copy
> >    Sheets("MFCs").Select
> >    Range("F10").Select
> >    ActiveSheet.Paste
> >    ActiveWorkbook.Names.Add Name:="FG_HC", RefersToR1C1:="=MFCs!R13C6:R" &
> > LastRow & "C"
> >
> >
> > It's not pretty and I have to do this 11 times with different FG species.
> > (CO, HC, NO, etc.)
> >
> > Any help would be appreciated!
> > Thanks,
> > Matt 
> 
> .
>
0
Reply Utf 1/3/2010 8:05:01 PM 

ok, I tried one more thing and this seemed to work.  Is there a way to make 
it less condensed?  For example... how come the following doesn't work?
Sheets("Engine Data").Cells.Find(What:="[Hertz]").Activate 

    Sheets("Engine Data").Select
    Cells.Find(What:="[Hertz]").Activate
    ActiveCell.Range("A2", 
Range("A2").End(xlToRight)).Find(What:="FG_HC").Activate
    Range(Selection, Selection.End(xlDown)).Copy 
Destination:=Sheets("MFCs").Range("F10")
    ActiveWorkbook.Names.Add Name:="FG_HC", 
RefersTo:=Sheets("MFCs").Range("F10:F" & Sheets("MFCs").Cells(Rows.Count, 
"E").End(xlUp).Row)


Thanks again!
Matt


"Gary Keramidas" wrote:

> maybe something like this, but you don't give enough information to actually 
> complete the code, (like where you discern the lastrow from). but have a look 
> and maybe you can complete it on your own:
> 
> 
> Option Explicit
> Sub test()
>       Dim arr As Variant
>       Dim rngfound As Range
>       Dim itmfound As Range
>       Dim i As Long
>       Dim lastrow As Long
>       arr = Array("FG_HC", "CO", "HC", "NO")
> 
>       With Sheets("Engine Data")
>             Set rngfound = .Cells.Find(What:="[Hertz]", After:=ActiveCell, 
> LookIn:=xlFormulas, _
>                 LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, 
> MatchCase:=False, _
>                 SearchFormat:=False)
> 
>             If Not rngfound Is Nothing Then
>                   For i = LBound(arr) To UBound(arr)
>                         With .Range(rngfound.Address, 
> ..Range(rngfound.Address).End(xlToRight))
> 
>                               Set itmfound = .Find(What:=arr(i), 
> After:=ActiveCell, _
>                                   LookIn:=xlFormulas, LookAt:=xlPart, 
> SearchOrder:=xlByRows, _
>                                   SearchDirection:=xlNext, MatchCase:=False, _
>                                   SearchFormat:=False).Activate
>                         End With
>                         .Range(rngfound.Address, 
> ..Range(rngfound.Address).End(xlToRight)).Copy
>                         Sheets("MFCs").Range("F10").PasteSpecial xlPasteAll
>                         ActiveWorkbook.Names.Add Name:="FG_HC", 
> RefersToR1C1:="=MFCs!R13C6:R" & _
>                             lastrow & "C"
>                   Next
>             End If
>       End With
> End Sub
> -- 
> 
> 
> Gary Keramidas
> Excel 2003
> 
> 
> "Matt S" <MattS@discussions.microsoft.com> wrote in message 
> news:38CA4ED8-2544-4E56-B60B-9700999821B6@microsoft.com...
> >I am trying to copy data from "Engine Data" and paste it into a new sheet.
> > Engine Data contains many columns of FG_HC... I only want the one under the
> > [Hertz] heading.  The format of the Engine Data looks like the following:
> >
> > [Mode]
> > FG_NOX  FG_HC  FG_CO
> > data         data      data
> >
> > [Hertz]
> > FG_NOX  FG_HC  FG_CO
> > data         data      data
> >
> > etc
> >
> >
> > Here is my code:
> >
> >    Sheets("Engine Data").Select
> >    Cells.Find(What:="[Hertz]", After:=ActiveCell, LookIn:=xlFormulas, _
> >        LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
> >        MatchCase:=False, SearchFormat:=False).Activate
> >    ActiveCell.Range("A2", Range("A2").End(xlToRight)).Select
> >    Selection.Find(What:="FG_HC", After:=ActiveCell, LookIn:=xlFormulas, _
> >        LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
> >        MatchCase:=False, SearchFormat:=False).Activate
> >    ActiveCell.Select
> >    Range(Selection, Selection.End(xlDown)).Copy
> >    Sheets("MFCs").Select
> >    Range("F10").Select
> >    ActiveSheet.Paste
> >    ActiveWorkbook.Names.Add Name:="FG_HC", RefersToR1C1:="=MFCs!R13C6:R" &
> > LastRow & "C"
> >
> >
> > It's not pretty and I have to do this 11 times with different FG species.
> > (CO, HC, NO, etc.)
> >
> > Any help would be appreciated!
> > Thanks,
> > Matt 
> 
> .
>
0
Reply Utf 1/3/2010 8:11:01 PM 

RefersTo:=Sheets("MFCs").ActiveCell.Range  'how do I do this refers to?


RefersTo:=Sheets("MFCs").ActiveCell.Address



"Matt S" <MattS@discussions.microsoft.com> wrote in message 
news:7D9215F7-3770-4B3A-8DAC-BFEAAFAE883B@microsoft.com...
> Don and Gary thanks so much.  I probably gave more information than needed
> and also made the post too broad.  I was more looking for a syntax 
> cleaning.
> This is what I have so far in my attempts to clean it up... I'm stuck on 
> the
> last part where I define the final pasted range as a name.  Don I will not 
> be
> able to send you the file.  It's got too much classified information in 
> it.
> Here is what I have so far:
>
>    Sheets("Engine Data").Select
>    Cells.Find(What:="[Hertz]").Activate
>    ActiveCell.Range("A2", Range("A2").End(xlToRight)).Find
> What:="FG_HC").Activate
>    Range(Selection, Selection.End(xlDown)).Copy
> Destination:=Sheets("MFCs").Range("F10")
>
> 'It works up to this point perfectly... then the following line doesn't 
> work
> out.  I'm trying to get rid of the LastRow reference.
>
>    ActiveWorkbook.Names.Add Name:="FG_HC",
> RefersTo:=Sheets("MFCs").ActiveCell.Range  'how do I do this refers to?
>
> Thanks,
> Matt
>
> "Don Guillett" wrote:
>
>>       If desired, send your file to my address below. I will only look 
>> if:
>>       1. You send a copy of this message on an inserted sheet
>>       2. You give me the newsgroup and the subject line
>>       3. You send a clear explanation of what you want
>>       4. You send before/after examples and expected results.
>>
>>
>> -- 
>> Don Guillett
>> Microsoft MVP Excel
>> SalesAid Software
>> dguillett1@austin.rr.com
>> "Matt S" <MattS@discussions.microsoft.com> wrote in message
>> news:38CA4ED8-2544-4E56-B60B-9700999821B6@microsoft.com...
>> >I am trying to copy data from "Engine Data" and paste it into a new 
>> >sheet.
>> > Engine Data contains many columns of FG_HC... I only want the one under
>> > the
>> > [Hertz] heading.  The format of the Engine Data looks like the 
>> > following:
>> >
>> > [Mode]
>> > FG_NOX  FG_HC  FG_CO
>> > data         data      data
>> >
>> > [Hertz]
>> > FG_NOX  FG_HC  FG_CO
>> > data         data      data
>> >
>> > etc
>> >
>> >
>> > Here is my code:
>> >
>> >    Sheets("Engine Data").Select
>> >    Cells.Find(What:="[Hertz]", After:=ActiveCell, LookIn:=xlFormulas, _
>> >        LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, 
>> > _
>> >        MatchCase:=False, SearchFormat:=False).Activate
>> >    ActiveCell.Range("A2", Range("A2").End(xlToRight)).Select
>> >    Selection.Find(What:="FG_HC", After:=ActiveCell, LookIn:=xlFormulas, 
>> > _
>> >        LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, 
>> > _
>> >        MatchCase:=False, SearchFormat:=False).Activate
>> >    ActiveCell.Select
>> >    Range(Selection, Selection.End(xlDown)).Copy
>> >    Sheets("MFCs").Select
>> >    Range("F10").Select
>> >    ActiveSheet.Paste
>> >    ActiveWorkbook.Names.Add Name:="FG_HC", 
>> > RefersToR1C1:="=MFCs!R13C6:R" &
>> > LastRow & "C"
>> >
>> >
>> > It's not pretty and I have to do this 11 times with different FG 
>> > species.
>> > (CO, HC, NO, etc.)
>> >
>> > Any help would be appreciated!
>> > Thanks,
>> > Matt
>>
>> .
>>
0
Reply JLGWhiz 1/3/2010 8:41:43 PM 

  That is your code creating a named range.


On Sun, 3 Jan 2010 15:41:43 -0500, "JLGWhiz" <JLGWhiz@cfl.rr.com> wrote:

>RefersTo:=Sheets("MFCs").ActiveCell.Range  'how do I do this refers to?
>
>
>RefersTo:=Sheets("MFCs").ActiveCell.Address
>
>
>
>"Matt S" <MattS@discussions.microsoft.com> wrote in message 
>news:7D9215F7-3770-4B3A-8DAC-BFEAAFAE883B@microsoft.com...
>> Don and Gary thanks so much.  I probably gave more information than needed
>> and also made the post too broad.  I was more looking for a syntax 
>> cleaning.
>> This is what I have so far in my attempts to clean it up... I'm stuck on 
>> the
>> last part where I define the final pasted range as a name.  Don I will not 
>> be
>> able to send you the file.  It's got too much classified information in 
>> it.
>> Here is what I have so far:
>>
>>    Sheets("Engine Data").Select
>>    Cells.Find(What:="[Hertz]").Activate
>>    ActiveCell.Range("A2", Range("A2").End(xlToRight)).Find
>> What:="FG_HC").Activate
>>    Range(Selection, Selection.End(xlDown)).Copy
>> Destination:=Sheets("MFCs").Range("F10")
>>
>> 'It works up to this point perfectly... then the following line doesn't 
>> work
>> out.  I'm trying to get rid of the LastRow reference.
>>
>>    ActiveWorkbook.Names.Add Name:="FG_HC",
>> RefersTo:=Sheets("MFCs").ActiveCell.Range  'how do I do this refers to?
>>
>> Thanks,
>> Matt
>>
>> "Don Guillett" wrote:
>>
>>>       If desired, send your file to my address below. I will only look 
>>> if:
>>>       1. You send a copy of this message on an inserted sheet
>>>       2. You give me the newsgroup and the subject line
>>>       3. You send a clear explanation of what you want
>>>       4. You send before/after examples and expected results.
>>>
>>>
>>> -- 
>>> Don Guillett
>>> Microsoft MVP Excel
>>> SalesAid Software
>>> dguillett1@austin.rr.com
>>> "Matt S" <MattS@discussions.microsoft.com> wrote in message
>>> news:38CA4ED8-2544-4E56-B60B-9700999821B6@microsoft.com...
>>> >I am trying to copy data from "Engine Data" and paste it into a new 
>>> >sheet.
>>> > Engine Data contains many columns of FG_HC... I only want the one under
>>> > the
>>> > [Hertz] heading.  The format of the Engine Data looks like the 
>>> > following:
>>> >
>>> > [Mode]
>>> > FG_NOX  FG_HC  FG_CO
>>> > data         data      data
>>> >
>>> > [Hertz]
>>> > FG_NOX  FG_HC  FG_CO
>>> > data         data      data
>>> >
>>> > etc
>>> >
>>> >
>>> > Here is my code:
>>> >
>>> >    Sheets("Engine Data").Select
>>> >    Cells.Find(What:="[Hertz]", After:=ActiveCell, LookIn:=xlFormulas, _
>>> >        LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, 
>>> > _
>>> >        MatchCase:=False, SearchFormat:=False).Activate
>>> >    ActiveCell.Range("A2", Range("A2").End(xlToRight)).Select
>>> >    Selection.Find(What:="FG_HC", After:=ActiveCell, LookIn:=xlFormulas, 
>>> > _
>>> >        LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, 
>>> > _
>>> >        MatchCase:=False, SearchFormat:=False).Activate
>>> >    ActiveCell.Select
>>> >    Range(Selection, Selection.End(xlDown)).Copy
>>> >    Sheets("MFCs").Select
>>> >    Range("F10").Select
>>> >    ActiveSheet.Paste
>>> >    ActiveWorkbook.Names.Add Name:="FG_HC", 
>>> > RefersToR1C1:="=MFCs!R13C6:R" &
>>> > LastRow & "C"
>>> >
>>> >
>>> > It's not pretty and I have to do this 11 times with different FG 
>>> > species.
>>> > (CO, HC, NO, etc.)
>>> >
>>> > Any help would be appreciated!
>>> > Thanks,
>>> > Matt
>>>
>>> .
>>> 
>
0
Reply Archimedes 1/3/2010 9:43:53 PM
microsoft.public.excel.programming 6508 articles. 32 followers.

6 Replies
107 Views

(page loaded in 0.111 seconds)

Similiar Articles:

shift bypass key and VB code - microsoft.public.access.forms ...
Is there any way to password protect my code in the event ... (This pretty much means you'll have to split the database). ... do > this....but just some settings in the start-up ...

Move data from one server to another - microsoft.public.sqlserver ...
Backup and restore may take forever.. Any other way to speed up these moves creatively. ... from a set of old servers to a new >>>servers and they are pretty large ...

Inserting a blank row between rows of data - microsoft.public ...
Is there any easy way to do this? I'm pretty decent with Excel, but don't know VBA. I thought of recording a macro, but didn't know how to edit it so that I wouldn ...

Change 2007 excel Autofilter back to 2003? - microsoft.public ...
I need to > quickly bring up like values and compare ... the autofilter, arrow down enter and it worked pretty ... Any way to apply a filter automatically after changing a ...

OL 2010 Date (Conversation) view - microsoft.public.outlook ...
Hi - can't seem to find a way to fix this in Outlook 2010. My Inbox is set up ... include the time, which is pretty useless. That puts every message it's own group. Any ...

Any way to set up a Cross-Reference for products table ...
Any way to set up a Cross-Reference for products table ... Hi I have a products table that contains approx 10,000 records. There are many products that may be substituted ...

Document map without ToC - microsoft.public.word.docmanagement ...
It's pretty annoying seeing the same headings twice and ... Is there any way I can get the Document Map to show ... Then random text shows up in the Document Map, and ...

Recurring credit card payment in GP - microsoft.public.greatplains ...
Recurring credit card payment in GP Is there any way to set up a AP payment with credit card in GP. For example, our phone bills will be pay by ...

Limit logon access to the XP pro workstation on domain - microsoft ...
Is there any way beside group policy? Thanks ... secured" ... anyone with physical access can pretty much do whatever they want, unless you've got it locked up.

Unable to send or receive mail error - microsoft.public.windows ...
... the following error, I havn't changed anything recently and have > been running my email this way for eons, so pretty stumped that it has come > up with this. Any ...

How to Look Pretty - wikiHow
Stay pretty natural during the day and play it up during the night. If you have pimples or other ... That is the easiest way to be pretty. Remember - Beauty is in the eye ...

20 Tips on How to Look Pretty with No Makeup as a Preteen
Take a shower once a day, preferably in the morning because it can wake you up ... Also don't care if you are overweight or underweight every girl is pretty the way they are.

I need new pretty ways to put up my hair any ideas? ♥? - Yahoo ...
Best Answer: straighten it and do this..... http://imagecache2.allposters.com/images… it looks so pretty!.just clip it in the back to stay!

How to Be Pretty Without Makeup | eHow.com
Pretty Ways to Hide a Computer Cable. Computer cables can easily appear disorganized and ... Pucker Up: 8 Must-Have Shades; Framing Your Face; Accessorizing in Pop Colors

Josh Gracin - Nothin To Lose Song Lyrics - Any Country Music ...
By now she's got me pretty tied up, tied down, Any way I choose, I got nothin' to lose. Oh yeah, by the way she moves, She's got me rollin' in dirt: in a white t-shirt,

7/16/2012 1:12:03 PM


Reply:



Privacy Policy | All Times Are GMT(UTC) | powered by