wbk

Hi all, Still learning VBA and this may be a really basic question for all, but I am struggling to find the answer while surfing. Would really appreciate some simple explained help to learn. TASK I want to transfer data from one workbook to another. using a "transfer tool" which i can email...

I'm looking to tweak some code I already have that consolidates data from multiple sheets into a single, master sheet. Currently the VBA selects all sheets that starts with the prefix "A-", copies select cells and pastes them into the consolidation sheet. The change I would like to make is...

My code below opens an excel file using a user form. My code for some reason hides the ribbon every OTHER time it opens an excel file rather than every consecutive time. Am I missing something? Is there a way to narrow down the hide ribbon to the new opened workbook and active sheet? Private...

I have a program that opens up various workbooks, and I would like to have A1 automatically selected after a workbook is opened. My code is below. The opened excel file's name is saved as variable "OpeningVar". Private Sub CommandButton1_Click() Dim Wbk As Workbook Dim Pth As...

Hi Team, please help, My task is to open each workbooks from a range, copy workbooks range and paste in master file, But Challenge I am facing is that firstworkbooks data will be pasted correctly. but second workbooks Data should be pasted in specified range of Master workbook.and row should...

Hi Team, Please assist to make R1C1 formula dynamic. Thanks Below are my code my attempted Code.getting error at formula. Sub R1C1_Dynamic() Dim wbk As Workbook Dim wsh As Worksheet Dim mwbk As Workbook Dim msh As Worksheet Set mwbk = ThisWorkbook Set msh = mwbk.Worksheets("Sheet1")...

Hi Guys, I’ve got some code that imports “Sheet1” from a file I needto select from a pop up box. Sub ImportReport() Dim Fname As String Dim Wbk As Workbook For Each Sheet InActiveWorkbook.Worksheets If Sheet.Name ="Sheet1" Then Sheet.Delete End If Next...

I need to loop through all rows of my data, and consolidate all of the like rows into one row, and include a count of how many versions of that row there where. As you can see below I am trying to consolidate these 5 rows of data into 2, and my code does nothing of the sort, Can someone point me...

hi all i have this VBA code: Dim wbk As Workbook Dim wbk2 As Workbook Set wbk2 = Workbooks.Open(Filename:=F2) Set wbk = Workbooks.Open(Filename:=F1) of course F1 and F2 is a Correct filenames with path..... My question is how to know if workbook: wbk is already opened? (for not...

hi, i know how to: Dim WorksheetExists As Boolean WorksheetExists = Evaluate("ISREF('Graficas'!A1)") and work But i am work with some workbooks.... and then i need evaluate if exist sheets on each workbook. this: WorksheetExists = Evaluate("ISREF('Graficas'!A1)") Evaluate in the last opened...

Hi everyone, I've used this code many times but have never seen this error. Can anyone help? Sub Printer () Dim wbk as workbooks Application.displayalerts = false For each wbk in workbooks If left(wbk.name, 8) = "EBMF_POW" THEN Wbk.activate ~~printer code~~ End if Next wbk End...

Hello guys, is it possible to have an automatic update in the code that will find the name of the spreadsheet as for example when I pull the data from different workbook finding the report as it is now, but assuming the report is called now: Report (1) is it possible to have the macro taking...

I can generate a list of UDF with the following macro, but I'd like to put the args needed next to them. You can manually get a UDF args by pressing CTRL+SHIFT+A so there must be a way to do it programmically. Anyone? Sub ListProcedures() Dim sProc() As String Dim lngLine As Long Dim...

Hi all, This is my first post on this forum, you guys already helped me a lot by answering other people's questions. But now i can't really find a solution. We have on a yearly basis, a total of 208 workbooks (1 for each hal, p. week) now i want to extract a certain field of data to a...

Is there anyway to only open files that has a password, then change to new password, save file, then close? The script I'm using now opens ALL files, (with or without password) then saves it with new password. The other problem is some files has password "test123" while some has password...

Hi Team, I got stuck below in highlighted Bold line. please assist. getting object doesn't support error. Actually I want to open a existing workbook, by pasting its file path in sheet1.range("b5").value (i.e MacroBook). after that I want to set it and would like to use the variable in...

Hi Team, I have created a macro for consolidation of data from different workbook. I have asked user to put input in sheet1.range ("B4"). here I am looking for someone to help me in creating folder browser tab besides the input path code. and below that output path browser macro button. if...