vba code

Hello, A simple one. Private Sub Workbook_Open() Dim wsCSP As Worksheet Set wsCSP = Sheets("CSP Tracking") Application.ScreenUpdating = False With wsCSP.[A1].CurrentRegion .AutoFilter 10, "<" & [Today()]...

Hello, I use the below code for my absence tracker which was kindly provided on here. I now need to change it, so instead of looking at current 12 month rolling period and previous 12 month rolling period, it looks at: Current 6 months Tab - All absence in the last 6 month rolling period from...

Hello, @Petertenthije kindly provided the below code for my absence tracker on 13 August 2022. On the "current 12 months" tab, is held all absences within the current 12 month rolling period. The code will then activate upon opening the workbook and move any rows with an absence start date of...

Hi Guys, I'm trying to do a concatenate on some data that would base on how many data present on column A (header not included) and column B1-F1 (header not included), I tried recording a macro but unfortunately even though column A is only counts until A16(not fix number and may changes...

Hello Board, If anyone knows how to do the following that would be very helpful. I have a large excel with 100 different tabs which currently includes many hardcodes. Most of the tabs have the same structure which is helpful. I want to create a new tab where I can consolidate all similar...

Hello, I'll try and keep this as simple as possible. I'm working on an absence tracker, tracking employee's absence in the current 12-month rolling period and the previous 12-month rolling period. So, 24 months in total. The tracker is updated daily throughout the week and is EXTREMELY...

Hi all, I currently have a very large data sheet that looks like this: In this example, I've just put in a format of: Date,Name,Gender Please note that some of the cells however might only have Date,Gender or Name,Gender or Date,Gender etc. My ideal format would be: Date,Name,Gender...

Hello, I have a task to generate a sheet containing following headers : Part Number, Quantity, Date The quantity to be produced is given in one more sheet and that quantity needs to be distributed in that particular month. For example: In the vba code, it has to refer the particular month...

Hi all, I have the current VBA code: Option Explicit Private Const FilePath As String = "S:\File Path anonymous\" Sub send_email_complete() Dim OutApp As Object Dim OutMail As Object Dim i As Long Dim ws As Worksheet Dim col As New Collection, itm As Variant Dim...

I am in need of a code if Column K has value to insert next value into column N, if column N has a value to insert next value into column Q and so on. Please help!!

Hi all, I currently have this code, which saves my sheet (entitled "Sheet3") as a PDF: Option Explicit Sub SaveFileWithMacro() Dim Path As String Dim fn As String Path = "S:\Path\PDF files\" fn = Range("A63") ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=Path & fn & ".pdf" End...

Hi all, I currently have a macro that converts my excel sheet into a PDF and saves it in a designated folder. However, I only want it to save the first sheet as a PDF, and ignore my other sheets, which it will not do at the moment. My code looks as follows: Option Explicit Sub...

Hi all! I currently have this setup, please note that I have hidden all the nonrelevant columns however: The formula I use is this (thank you @RoryA !) =IFERROR(INDEX(INDIRECT("'"&H504&"'!$U$3:$U$73"),MATCH(1...

In the midst of trying to automate a report and the final step is to take the 2 workbooks and copy all the data (excluding the header) from WB1 to the first empty row of WB2. The issue I'm having is that it when it copies from WB1 it will paste about 173 rows below the last row of WB2... not...

Hello, can anyone please help me to write a code which delete all the rows if Column AM in sheet "Sponsored Products Campaigns" has text as same as in sheet "Control Panel" Cell S7, so for example it will search the text from Cell S7 Sheet "Control Panel" in the Column AM sheet "Sponsored...

Good morning. I read the article concerning this question but the recommended code was not working for my intended application. I am looking for some help, please. I have an excel table for which I need to back up daily. I want to save new data (values only) each day without overwriting the...

Hello, can anyone please help me find out what is the mistake in this VBA Code, it is not giving any error but highlighted part is not doing what it needs to do (deleting the rows as per the mentioned criteria) Sub Xlookup() Dim c As Range, va, x For Each x In Split("Sponsored...

Hello, so when I download this sheet from the web, it always shows this error "Convert to number", basically in few of columns (where there are numbers) it is stored as different format which does not allow you to sort with number and mathematical operations, I change it manually with...

Hi, so I need to delete the complete row if specific criteria is met, the criteria is as follows, In a sheet named called "Data" If column B contains either of "John", "David", "Susan", "Macro", few of them, or all of them, then delete those specific rows leaving the others (Note: If any of...

Hello there. I am a bit rusty with Excel and VBA following differing jobs not needing it so much, however I am now currently in a role where using advanced Excel and VBA would be extremely beneficial. I am currently stuck on something which I am guessing is reasonably simple, and google is not...