vba & code

I'm seeking assistance in creating a VBA macro that can help me merge data from multiple workbooks located in different folders based on order numbers in another excel file. I am beginner and not having enough knowledge in VBA. It would be a kind help to achieve my migration activity. Here's...

While import file will have many row maybe more than 5000 row, so I want to cut 1-100 row to in 1 excel and then 101-201 loop file until to 5000 row. Sub test() Sheet60.Range("A1:BX100").Copy Workbooks.Add Application.DisplayAlerts = False ActiveSheet.Paste Destination:=Range("A1")...

hi, I have 3 sheets in this attached file where I record information in the data sheet and it is saved in the Save_Data sheet. In the Admin sheet, how can I write a formula that by entering the date and user name, the registered information from the Save_Data sheet will be called and placed in...

Hello all. I have a workbook with over 20 tabs. I am trying to build a VBA code that it goes through all 19 tabs inserts rows creates a table inserts a slicer. The tables consist of the same columns but the rows will vary. Slicer is always the same. Also, i have a Summary sheet that does not...

Hi guys, I'm after a VBA macro code that I can have saved in a workbook that, when run by pushing the macro button. Brings up a window where you can select a folder and it will find all excel workbooks in that location and print them to PDF. I would like the Print to pdf to only print used...

I need to sum the expenditures of multiple projects defined under several worksheets. Each project is named on the worksheet tab. The first workbook contains the expenditures per month per category. The categories are "Labor" and "Material". The expenditures (i.e., under the first workbook)...

Hi; In a user form, we have 6 ComboBox and the value of all of them is the same Is it possible to assign a value to all of them with a loop? And by selecting an item in any of the combo boxes, that item will not be displayed in other ComboBox

Hi Gurus, Could you help me simplify below code which I recorded? Basically, I need to apply these conditional formatting and hoping that the macro will look for Change 1, Change 2 and Change 3 header name and reflect the number format for all tabs (as the column might interchange on the other...

When "ITEM LIST" is selected in the range in particular cell, the HYPERLINK should be visible on the side. *My Hyperlink click and Jump Sheet 2 "Table 2" (Table 1 location = Sheet 1) My TABLE NAME IS = "Table 1" Range name (B3:B8) = "ITEM_LIST" How to possible This Query ??? Kindly Share...

Hi; In a user form, we have 6 combo boxes and the value of all of them is the same Is it possible to assign a value to all of them with a loop? And by selecting an item in any of the combo boxes, that item will not be displayed in other combo boxes

Good morning all, I hope you are having a great day. I hope you can help as I am now stuck on the code as I have tried numerous iterations and I can seem to resolve the "Compile Error" message on file dialog object. I am sure I am missing something, but I can't see the forrest through the...

Hello In an Excel file that has several sheets, there is a ComboBox in each of the sheets. I created a sheet list with the code below Private Sub Worksheet_Activate() ComboBox1.Clear For wsheet = 1 To Sheets.Count ComboBox1.AddItem Sheets(wsheet).Name Next End Sub By selecting the...

I am still fairly new to VBA and am having issues figuring out this code. I want to check in sheets May - December for today's date in my Date Ordered (J) and Date Received (M) column, Then copy that row into Today's changes sheet. Columns J and M should never both equal the same date as I have...

Private Sub cmdClose_Click() End End Sub Private Sub cmdSubmit_Click() 'Priority Options If Pri1.Value = "True" Then Worksheets("Procedures").Cells(lastrow + 1, 2).Value = Pri1.Caption End If If Pri2.Value = "True" Then...

1st macro: Sub ReplaceText() Dim WordApp As Object Dim wdoc As Object Set wAPP = CreateObject("Word.Application") wAPP.DisplayAlerts = False wAPP.Visible = True Set wdoc = wAPP.Documents.Add(Template:="C:\Users\Desktop\Site Survey VBA TEST 001.docx", NewTemplate:=False, DocumentType:=0)...

Hi guys, Need some help on the below code please. See code below. What I would like it to do is to do the following, in sequence: 1. Create a new folder in the location of the Workbook. Name this folder based on the contents of worksheet cells "D2" and "D3", then the current date and time...

Hi guys, Need help on this one please, not sure how to go about doing it. I have the code below that I have been using up until now which prints the active sheet to PDF in the Downloads folder. What I would like it to do is to do the following, in sequence: 1. Create a new folder in the...

Hi guys, Need help with the formula below. What I need it to do is search through the workbook sheets (2-101) and check on each sheet if cell "D1" shows a result of TRUE or FALSE. If it is TRUE, then I need the formula to change the contents of cell "E6" on that sheet to read the current date...

Hi guys, I have the VBA code below to print the active worksheet to PDF in the Downloads folder. It prints to A4 sheet size on my computer BUT on my colleagues computer it prints it to Letter paper size. We want it to always print to A4 paper size, regardless of what computer it's used on or...

Hi guys, I need urgent help with this VBA code, I have got it searching a cell in each worksheet ("E1"). The issue I am having is that when it gets to a sheet where the cell "E1" does not have the cell text "NO", the code stops and it will not continue on to start searching the next worksheet...