Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Wanet Telecoms Ltd on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Recent content by SharonMee

  1. SharonMee

    #ref error

    Thanks so much, that worked perfectly. Sharon
  2. SharonMee

    #ref error

    Hello all: I hope you can help me with the following: In cell C4, I have the following formula: $G$5. Sometimes I need to delete columns G to K, such that columns L to P shifts into place i.e. now becomes column G to K. Can you please tell me why I am getting this error since column G still...
  3. SharonMee

    insert text in cell and macro

    Hi ClFlava Thanks so much, I would pay more attention next time.
  4. SharonMee

    insert text in cell and macro

    Hi cLFlaVA: Thanks, I have made the changes, but I think the way I have it set up is not giving me the exact results. My data has 11 rows. What the code below does now is: in T13 it inserts the word Signature, that's what I want. But then it formats T15 with the All Border and changes the...
  5. SharonMee

    insert text in cell and macro

    Thanks clFlaVA, That worked! If I want to select that cell T... and format it with a row height of say 45 and format it with All borders, I did this, but I am getting a debug in the Line Style part of the code: Sub Signature() Sheet3.Activate If Sheet3.Range("T4").Value > 0 Then...
  6. SharonMee

    insert text in cell and macro

    Hello everyone: I am trying to write a macro: Sub Signature() Sheet3.Activate If [T4] > 0 Then r2 = Rows.Count + 1 [T.r2] = "Signature" End If End Sub But it's not working because I am not sure of the syntax to use. I want to insert the Word Signature in column T of the last row + 2 if T4 is...
  7. SharonMee

    last row

    Thanks a lot guys. I didn't know the select, activate thing could slow down the macro, thanks for pointing that out to me Skip. CLFlava, thanks for making the macro shorter. Thanks for all your help. Sharon
  8. SharonMee

    Print Area and Excel

    Hmmm...the page setup thing does not work automatically though, am I right? When I copy and paste data into a particular sheet, sometimes the data rows exceed the print area. I tried the page setup 1 by 1 but it doesn't work automatically. I don't know how the Workbook BeforePrint thing works...
  9. SharonMee

    Print Area and Excel

    Hello All: Is there a way to make the Print Area cover all the rows with data in a worksheet? I.e. to make the Print Area dynamic?
  10. SharonMee

    last row

    Wow, Skip: You're right. Thanks so so much.
  11. SharonMee

    last row

    Yes Skip, I have enough rows. In the sample I am working on, I have 6 "No"s i.e 6 rows. The code works okay by filtering for the "No" in sheet5 and then copies and pastes these rows in sheet3, so the code is working up to the line 'Application.CutCopyMode = False" but the code does not execute...
  12. SharonMee

    last row

    Hi Skip, I tried the test thing, and yes it gave the the number of the last row, here is the whole code I am running, maybe you can help me find the glitch. I have looked at it (with the little knowledge I have) but can't find anything wrong. Thanks much again. Sub UNonAP() Sheet3.Select...
  13. SharonMee

    last row

    Thanks Skip, I am looking at the Active Sheet and there is just 1 workbook open. What else could be the problem? Thanks again.
  14. SharonMee

    last row

    Hi Skip, I hope you're not running out of patience yet after r2 in the code you gave me I inserted [Q4] = r2, and put a break in the rest of the code, but I am not getting any value. How can I make it work? Thanks again.
  15. SharonMee

    last row

    Hi Skip, Thanks. The data on my active sheet has the header in row 5. Usually, row 5 already has the border around it, but the new rows copied and pasted from another sheet, don't have this border, so I want to format row 5 to the last row if there is a last row with the All Border format. Here...

Part and Inventory Search

Back
Top