I have a worksheet that contains about six different tabs. When this form is completed some users might want to have certain tabs copied into a different workbook. Unfortunately each user might want to copy different tabs. I was wondering if there was a Macro that I could write that would ask the users which tabs they want to copy into a new workbook.
View 4 Replies
How do you add a macro to a cell that works wen the user tabs out the cell?
View 9 Replies View RelatedI have a program that takes a templete, copies it, fills in some information and then renames the tab based on text in a cell on that sheet. The code loops so I end up with about ten tabs that are created from the Template.
I want to move these newly created tabs to a new Workbook.
is there a way (code) that will move all the tabs except ones delineated in the code - like the tab named "Template"?
Have 2 workbooks very similar and need to copy a working user form to newer workbook. Exported and Imported the user form to the new VBA project but can't figure how to bring user form into the new worksheet.
View 9 Replies View RelatedI have 2 workbooks. The workbooks have 36 tabs for each department. Workbook 1 are current charges for the departments and workbook 2 is the revenue for each department. I would like to take the top 2 rows from workbook 2 and add them to workbook 1 at the bottom of each tab. I was able to get it to work to a specific row but the workbook 1 has variable rows for each tab.
View 3 Replies View RelatedI have been trying to get Excel (2007) to change the colour of tabs to match other tabs in the workbook
Using this code I get the colour code of the current tab
Code:
x = ActiveSheet.Tab.ColorIndex
But when I use this value in a procedure like this:
Code:
ActiveSheet.Tab.ColorIndex = x
The tab is a different colour!
I am using this code to copy columns C,D, and P from a user selected workbook into position C,D,E of workbook "Checklist.xlsx" (the one from were I run the VBA code). I don't have a clue about VBA, just have been gathering info, but the code works pretty fine. The only issue is that it opens twice the workbook "wbExt" hence the system prompts me if i want to reopen the already open workbook.
Some questions:
1) Is there a way to copy the 3 columns at once? something like "Columns("C:D, P").Select".
2) Is there a way to select the workbook from were to copy the column without needing it to actually open?
3) is there a way to paste the columns starting from row 3 instead of row 1 (Range("C1").Select)?
I have a macro that takes data in rows 1 through 500 from many tabs and collects them in the summary tab.
I would like to write a macro that only selects rows that have data in Column A. Therefore, reducing the number of rows copied from all tabs from 500 to only a few that contain data that I really need.
This is what i currently have:
[Code] .........
I have a macro that runs when the workbook opens. At the end of my macro I've added a Yes/No box. If 'No' the workbook closes without saving. If 'Yes' I would like to restart the macro. I can close it ok, but I don't know how to restart the macro from line 1 when 'Yes' is selected. Here is what I have:
YesNo = MsgBox("Done! Would you like to run again?", vbYesNo + vbCritical, "Caution")
Select Case YesNo
Case vbYes
'I don't know what to put here :(
Case vbNo
ActiveWorkbook.Close savechanges:=False
End Select
I have a workbook with four tabs or four sheets.
Tabs 1, 2 and 3 have a column of data (Column A) on each sheet. They all start from the same cell. Each cell of data are just numbers. The column (an array) of data will not have blanks between.
But, they are not the same number of data. They vary.
Meaning, Tab 1 may have 15 numbers (A1 to A15), Tab 2 may have 20 numbers (A1 to A20) and Tab 3 could have 5 numbers (A1 to A5). Each iteration of the workbook may have different number of data in the A column on these tabs.
Now on Tab 4, I want combine the data from all three tabs into one column (in column A).
So, Tab 4 has a column A with data from Tab 1 copy and pasted to (A1 to A15) as values, then (A16 to A35) have Tab 2 data copy pasted as values and (A36 to A40) have Tab 3 data copy pasted as values.
Basically, the macro on Tab 4 has to count the number of rows on each Tab that are populated with data values and figure out to copy all the data on Column A from each three tabs and paste the data value into the Tab 4 in one column of data (in values).
I am making a macro that requires that user to enter a directory path into a input box and the macro will open the file. Right now it works fine bit i would like to change the code so that instead of using an input box it brings up a box that will allow them to browse files on their computer and then select one to open.
View 4 Replies View RelatedI am trying to create a macro that will compare several un-formatted workbooks and copy just what I want to a workbook of my one.
I start by having 2 different workbooks opened ("Main" and "Change") side by side like this: 1.jpg
Then i run the macro in my "Main" workbook and it should appear an Userform like it showed in the image below: 2.jpg
This is so that i can manually fill the user form with the correct columns by looking at the excel file, for example:
Ref=E3;City=G3; Data=I3.
Pressing Ok, it fill the "Main" workbook with the matching information so it and closes the "Change" workbook.
At the moment my code is in this stage:
VB:
Private Sub CommandButton1_Click()
myfile = "C:Userssst1brgDesktopRelatorios" & TextBox1.Value
Application.Workbooks.Open Filename:=myfile
Windows.Arrange ArrangeStyle:=xlVertical
[Code] .....
But I am stuck because there isn't any error and nothing happens.
I cant seem to get to work together in the same macro but that work great seperated. I need them to be in the same macro. The first just simply copy's text from one workbook to another:
Sub Test2()
ActiveSheet. Range("a1").Copy _
Destination:=Workbooks("punchlist.xls"). Sheets("Sheet1").Cells(Rows.Count,1).End(xlup).Offset(1,0)
End Sub
That worked ok but I needed to change it to the "active cell" instead of cell "a1". So then this line of code was made:
Dim userInputCell As Range
On Error Resume Next
Set userInputCell = Application.InputBox("Use the mouse to select a cell on any sheet", type:=8)
On Error Goto 0
If userInputCell Is Nothing Then
MsgBox "Cancel pressed"
Else
Msgbox "You selected " & userInputCell.Address(,,,True)
End If
The second code works just the way I want it but it doesnt copy over the text to the other workbook. I assume the 2 codes need to be together but I cant get it to work without errors. I also need the text to copy over without changing the borders on either workbook.
Here's my macro:
Code:
Sub CopyRow()'
'Copies row to new sheet, highlights it, marks column 'A' as copied.
'
Dim cCell As Range
Set cCell = Selection.Cells(1, 1)
Selection.Copy
Sheets("Sheet2").Select
Rows("2:2").Select
[Code] .....
Is it possible to modify it to paste into a different workbook called c:filesDestination.xlsm, instead of the existing workbook (Source.xlsm)? The destination sheet name is the same (Sheet2). It's OK if both workbooks are open at the same time.
I am trying to develop a macro that allows the user to copy and paste a set of date and time values, move them to the next sheet and increase the month by 1. I need help trying to find out how can I create a counter for the program to keep running without the need to reprogram the macros again.
View 14 Replies View RelatedI have nearly finished my project, but need to make the last real bit of code, then just some general tidying up.
What I want to do
- I currently have two tabs in a userform - one called 'main' and one called 'extra'.
- I want Main to always be shown to the user.
- I want Extra to be hidden (is it possible to make the tabs invisible?) and for this form to be shown only under a specific condition
I have a question on my userform (using Option Buttons):
"Did the customer ask about an extra product today?"
If the answer to this question is no - When the user hits the command button (after filling out the rest of the form), do nothing special - just return all the values to the worksheet
If the answer is yes - When the user hits the command button, I want them to be taken to the 'extra' tab. They will fill out some additional check-boxes, then hit another command box, which will return the info from both the 'main' and 'extra' sheets into the same row of the worksheet.
In brief: I want my 'extra' tab to be hidden, only to appear when 'yes' is selected, and for the results all to go back to the worksheet.
How would I reorder columns & tabs based on a form where the user can put them into order that they would like the columns? I forsee some type of form where the user can dsignate the order and then start a macro that will sort both the columns and tabs.
View 5 Replies View RelatedI have a workbook that has a lot of formulas in it that reference material stored on my local computer.
I need a macro that will copy all 42 tabs in to a new workbook book without all formulas, but saving all the formats have made. This would save me from every other day coping and pasting manually each of the pages.
I have this nice macro that copies data from another workbook. I want to make it to also add the filename of the workbook (for example data.xlsx) it copies the data from, in a cell on the actual workbook (for example on sheet "Combined", Cell A10). What should I add to my macro?
View 3 Replies View RelatedI am creating a spreadsheet to provide to a group of about 40 people. The spreadsheet allows each member to track the referrals they receive and give. I need to plan on creating updates for the spreadsheet and want to make it so they can easily transfer their data to the most current version in the future. Here is a breakdown of the workbook:
Worksheets:
Members
Lists
Referrals Given
Referrals Received
Totals
Formulas
I need to copy the data that they have input from the following worksheets:
Referrals Given
Referrals Received
Here is a breakdown of the "Referrals Received" worksheet:
A1:V4 - Data that will not change and includes many named cells
A5:Nxxx - Dynamic Named Range where they input their data
O5:Vxxx - Contains formulas
I need to be able to copy
A5:Vxxxxx
from the old workbook to the new
Some side items to note:
There is VBA in the worksheet of
Private Sub Worksheet_Change(ByVal Target As Range)
and included in the code is an Unprotect & Protect code to always keep the sheet protected
I figure whatever works for this sheet will work for all the sheets.
I need to copy several macros from the Personal Macro workbook to a new workbook that I need to take to another computer. I need to be able to run the macros on that computer. I can only record macros and make minor changes in the VB editor. I do not know VB code.
View 5 Replies View RelatedI have 3 workbooks with multiple spreadsheets (tabs) in each workbook. I want to open a blank workbook and copy various sheet tabs from the other workbooks into my new workbook. I need to keep the formatting etc when these are copied over. There are text boxes in some of the existing workbooks and macro's.
View 2 Replies View RelatedI have 2 workbooks , each with one sheet that is populated. I have tried to record the macro where by, I open the first workbook and then want the second book opened, copy the information on the 2nd workbook, paste it into the 1st workbook, close the second workbook. I have assigned a macro to it but when it opens all it does is open the second workbook.
Sub Macro1()
'
' Macro1 Macro
'
[Code].....
I have a spreadsheet with multiple worksheets in a spreadsheet which has been distributed and filled out by others.
I would to be able to:
-open each returned spreadsheet (by browsing and selecting the file)
-click a macro and have the macro select information from a range for each worksheet and have that information copied into the relevant worksheet in a master spreadsheet. I.e workbook1 to workbook1, workbook2 to workbook2
-during the copying process the information should be filled in the next empty row in the master spreadsheet
What it does is on the menu sheet is the workbook destination (i1) and it copies the range from that workbook to the original workbook and pastes it into "sheet1" but the below brings up a mesage box about data being on the clipboard.
View 5 Replies View RelatedI want to use a macro to copy a specified workbook and paste it to the same directory with a different name.
View 9 Replies View RelatedI have a workbook with several tabs. The top tab is the main spreadsheet
were I enter all my gathered data. The other tabs are the same spreadsheet,
the same data, but broken out by specific building.
Right now, I enter the data (alpha and numeric) into the main spreadsheet,
then manually copy/paste it to the respective sub-level spreadsheet.
I can specify the "IF" part of the line item that would identify which sheet
to copy it to, but is it possible to have a "THEN copy and paste [these
cells]" to the other spreadsheets?
I need to come up with a macro code to copy 2 worksheet from 2 workbooks to my current workbook. I do not know what is the code such that i can copy different worksheets from other workbooks to a currently opened workbook.
Below is the scenerio i want to achieve:
worksheet1 from workbook1 need to be copied and paste as a worksheet in workbook3. worksheet1 from workbook2 need to be copied and paste as a worksheet in workbook3. workbooks will eventually contain 2 worksheets which are from workbook1 & 2.
I'd like to create a macro to copy data from tables in a workbook named "Survey Template 2014" to another workbook named "Status Report." Basically, I'd like the macro to search through the sheets in "Survey Template 2014" based on the Aircraft Registration No: entered in cell R2 of "Status Report." Once the required sheet is found, I'd like to start copying the contents from the "Description" column from 4 tables (Left/Right Wing Structure, Flight Controls/ Empennage/Doors, Nose/Fuselage and Interior/Passenger environment/Misc) if any data exists. I'd like the data to be copied into C19 (under Tasks Column) of the "Status Report" workbook.
View 2 Replies View Relatedmake a macro which copies columns B to E from workbook 'Book1' (sheet named database) into another workbook called 'Book2'?,
View 3 Replies View Related
