lstrow

  1. J

    Pop up message

    Hi, have these codes to remind me bill payments (this workbook has two sheets) the problem having if I am working the other sheet when times for the pop up get error message is there any way the message pop up even I am the other sheet. codes: Sub popup()Dim lstRow As Long Dim i As Long Dim...
  2. W

    if..then..else error vba

    Hi Anyone able to help me debug my code below? it kept prompting me compile error: else without if where did i make a mistake? Dim s As String Dim r As Long Dim c As Long 'set active sheet Set ws = ActiveSheet 'finds the last row lstrow = ws.UsedRange.Rows.Count c = 2 For r = 1 To...
  3. J

    Popup timer

    Hi, how can i make the codes below popup display reminder every 2 hour message. Sub popup()Dim lstRow As Long Dim i As Long Dim msg As String msg = "The following items are almost due" & vbCrLf & vbCrLf lstRow = Range("A" & Rows.Count).End(xlUp).Row For i = 2 To lstRow If Range("A" & i) -...
  4. E

    Strange behavior defining the value of a cell as date

    My code have this line which is to insert current date in a cell: Application.ScreenUpdating = False with sheets(1) .Range("I" & LstRow) = Day(Now) & "/" & Month(Now()) & "/" & Year(Now()) .Range("I2:K2").Copy .Range("I" & LstRow & ":K" & LstRow).PasteSpecial...
  5. S

    VBA Code - edit

    Hi i have the following VBA code to create folders - however, how can i edit this code so if i have two folders with the same name for eg 02052018 02052018 the code will make it do 02052018 02052018 - 2 ( or - 3...depending the number of times it has been copied over) Sub MakeFolders()...
  6. M

    Dynamic AutoSum

    Hello, I am looking to do a Dynamic AutoSum function in VBA. Here is my code: Rows(1).Find(what:="Qty $", lookat:=xlWhole).Select LstRow = Cells(Rows.Count, ActiveCell.Column).End(xlUp).Row + 1 Cells(LstRow, ActiveCell.Column).Formula = "=SUM(ActiveCell:ActiveCell.Column" & LstRow - 1 & ")"...
  7. N

    Calling Functions, Last Row, Last Column

    I am having a heck of a time finding the last columns and rows. I know I'm missing something simple and I've gotten this far with some help (Thanks KD!) but I still can't find the missing link. I see and understand all the articles, but I'm missing something obvious. I have the following but...
  8. V

    Select Range of the last row

    Below code only work to select single cell. Let say last row is row 50. How do I select range of last row between A50 to Z50. Cells(LastRow + 1, "A").Select Is it possible to combine below codes into single line? Cells(LstRow, "C").Formula = "=SUM(C4:C" & LstRow - 1 & ")" Cells(LstRow...
  9. P

    finding the first available cell in the column to paste a value into

    Trying to create a range variable that will be the next available cell in the column (after the last used cell in that column, or just below the last used cell in that column) When I step through the code, I get an error on the line of code that begins "Set LSTROW= ....." Can anyone help me...
  10. N

    Help to correct Syntax ... Error: Wrong number of Arguements or Invalid property Arguement

    Hi Can someone help me to correct my syntax below As i am getting error Wrong number of Arguements or Invalid property Arguement Dim a as Variant Dim matchValueString as String Dim curRow as Long Dim lstRow as Long a = Application.Match(matchValueString, (xWk.Range(Cells(3, curRow), Cells(3...

Some videos you may like

This Week's Hot Topics

  • Turn fraction around
    Hello I need to turn a fraction around, for example I have 1/3 but I need to present as 3/1
  • TIme Clock record reformatting to ???
    Hello All, I'd like some help formatting this (Tbl-A)(Loaded via Power Query) [ATTACH type="full" width="511px" alt="PQdata.png"]22252[/ATTACH]...
  • TextBox Match
    hi, I am having a few issues with my code below, what I need it to do is when they enter a value in textbox8 (QTY) either 1,2 or 3 the 3 textboxes...
  • Using Large function based on Multiple Criteria
    Hello, I can't seem to get a Large formula to work based on two criteria's. I can easily get a oldest value based one value, but I'm struggling...
  • Can you check my code please
    Hi, Im going round in circles with a Compil Error End With Without With Here is the code [CODE=rich] Private Sub...
  • Combining 2 pivot tables into 1 chart
    Hello everyone, My question sounds simple but I do not know the answer. I have 2 pivot tables and 2 charts that go with this. However I want to...
Top