VBA for last day of previous month

LeonardH

New Member
Joined
Dec 21, 2013
Messages
21
Hello Everyone,

I'm working on VBA where I am using autofilter to sort data. In cell "A5" I have the formula =EOMONTH(TODAY(),0). This brings up the end of the current month. In my code for the filter, I need to be able to reference the value in that cell and get the last day of the month prior to whatever date is in that cell.

VBA Code:
ActiveSheet.ListObjects("Table4").Range.AutoFilter Field:=34, Criteria1:= ....
Thanks!
 

Some videos you may like

Excel Facts

Fastest way to copy a worksheet?
Hold down the Ctrl key while dragging tab for Sheet1 to the right. Excel will make a copy of the worksheet.

mrshl9898

Well-known Member
Joined
Feb 6, 2012
Messages
1,368
Try this:

VBA Code:
Sub finddate()

Dim mydate As Date

mydate = Range("A1")

EoLM = DateSerial(Year(mydate), Month(mydate), 1) - 1


End Sub
 

davidausten

New Member
Joined
Sep 1, 2017
Messages
35
Office Version
2016
Platform
Windows
mrs beat me to it. mine was a slightly different version.
 

Subscribe on YouTube

Watch MrExcel Video

Forum statistics

Threads
1,106,102
Messages
5,509,246
Members
408,718
Latest member
Bea2136

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