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 wOOdy-Soft 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 IfThenElvis

  1. IfThenElvis

    Currency changing in invoice excel xp

    Is the sheet protected? Click on Tools-Protection-Unprotect Sheet.
  2. IfThenElvis

    Pasting and Deleting Error in Excel Macro

    Note: This question is also posted with replies in the Microsoft Office Forum.
  3. IfThenElvis

    Pasting and Deleting Error

    I tried moving the macros from a Module1 to the Workbook module to a Worksheet module & it still worked. Try removing "Deleting" from the PasteSpecialXX macro and then run each macro separately. Which one bombs out? I'm using Excel 2000. Is your sheet protected? Do you have any Event...
  4. IfThenElvis

    Pasting and Deleting Error

    Hi Arthur, you can't call your Procedure 'Sub PasteSpecial' as it is already defined as an Excel operation, call it "PasteSpecialXX' or something else. You may also have to rename Public Name As String. When I make these changes it runs OK for me. Doug
  5. IfThenElvis

    VBA: conflict of delete row command and a module

    If you are looking for an automated way to delete rows then try this (modify as required. It's best when deleting rows via VBA to work up from the bottom: Sub del_rows() lastrow = Cells(65536, 1).End(xlUp).Row For c = lastrow To 1 Step -1 If Cells(c, 1).Value = "aa" Then Cells(c...
  6. IfThenElvis

    Excel 2000 - Need assistance with DATE/TIME

    Hi, try this: =IF(rounddown(B3,0)>A3),"late","on time") Excel days are saved as whole numbers and hours/minutes as fractions. Today May 30 is 37771 and 12 noon would be 37771.5 So you can rounddown the delivery time to remove the time of day.
  7. IfThenElvis

    Excel subtotal heading text & another subtotal in 1 cell

    A quick & dirty way would be to put this formula in D4 and copy it down column D. Blanks would show up on non-subtotal rows. =IF(RIGHT(B4,5)="total",COUNTIF(B:B,LEFT(B4,LEN(B4)-6)),"") Hope this helps.

Part and Inventory Search

Back
Top