I am trying to create a program to automate the gauging figures on oil barges, currently everything is done by hand and takes approximately 20 minutes to complete. I have the charts entered for the tanks already and have the code set so that when you click on a tank "gauge" it will enter the "volume" which corresponds to that gauge on a totals sheet. Here is where my problem is coming in
The barges are gauged at four points "before loading" "after loading" "before discharge" "after discharge"
I want to set a worksheet as the default page with four command buttons that let the user select which operation he wants to perform. before load figures. after load figures and depending on which operation they select have it enter the volumes in the appropriate cells on the totals sheet. So if someone selects "loadopen" command button I want the following code to run on my worksheets............................
I have a button (A) that will unhide worksheet A. I would like to add another button (B) that will hide(very hidden) worksheet A (if allready open) then open worksheet B, vice versa when click button A.
Code: Sub ShowSheets() With Worksheets("A") .Visible = xlSheetVisible .Activate .Range("A1").Select End With End Sub
Is it possible to change the color of buttons or command buttons? There does not seem to be any place that allows this under properties for buttons, although there does for command bars. However, I've tried recording a macro as I change the color, but nothing get's recorded so I'm not sure what the syntax would be.
I have a spreadsheet with several buttons and I'd like them to change colors as they are pressed so it's possible to see what you've already done. And then, as soon as any other cell on the sheet is changed, the buttons reset color.
I have a range of cells (A1:D5) identified within a worksheet (worksheetA) as part of a user input form.
When a certain condition exists, a routine is executed that copies a range of cells (C1:F5) from another worksheet (worksheetB) to this defined range. The copied area consists of two command buttons. They get copied and pasted no problem.
When I want to reset (blank it out of its contents) my range in worksheetA from I copy another range over of just a range of blank shaded cells. However, doing this does not eliminate the command buttons left in the range on previous pasting.
How do I delete these command buttons left from previous pasting activities when I wish to reset my range?
I made a userform to calculate the net weight of a package by taking the gross weight and deducting the amount of boxes included in the package. The most boxes possible is 25, so I used 25 command buttons numbered 1 to 25, so users only have to press the desired amount of boxes for the calculation to begin.
But that also means I've got 25 subs containing the same formula, and that's a bit much. I'm pretty sure this could be done more efficiently,
I can't write macros, so have to create them by actually recording the process. I did that just now and then copied it into the Command button. When I run it from Tools>Macros, it works, but when I run it using the Command button it fails.
I'm trying to copy and paste values current MTD figures (P18:P39) to previous MTD area (W18:W39), but the command button fails at this selection. Cells 28-35 are blank, but I don't think this makes any difference, as I've tried the command button with those cells zeroed out.
This is what I recorded initially; this works from Tools>Macros
Sub Macro1() ' ' Macro1 Macro ' Macro recorded 04/01/2008 by Lucertola ' ' Sheets("Reconciliation").Select Range("P18:P39").Select Selection.Copy Range("W18").Select.....................
I have a workbook with some command buttons that I created a while back. The buttons used to work fine. But after installing a new computer, the spreadsheet no longer works. I can step through the code fine, but when I try to click on the button, nothing happens.
Is it possible to create a number of command buttons, depending on the number of lines on a worksheet, and then have the code attached to the command buttons execute based on the position of the buttons on the sheet. For example, if I have a button positioned over, say A3, can the code execute based on the content of another cell in the same row. I imagine that the button would have to be linked to the cell, but I cannot see how that is achieved.
I was creating command buttons and had trouble using the linked cell. I found an example on the forum here but the command buttons seem to have many different behaviors. On the attachment, "Button 1" and "Button 2" are the ones I created in Excel 2003. "Button A" and "Button B" are from an example I found on the forum.
1 and 2 can only be edited on design mode, and have the formula "=EMBED("Forms.OptionButton.1","")" by default (which yields an error when exiting the formula field). A and B can be edited at any time, and have an extra tab ("Control") on the Control Format dialog. This seems to allow the linked cell to be set and function pretty handily. Are A and B from a different version of Excel? Auto Merged Post;Here's the attachment:
In the attached workbook there is a UserForm with five (5) command buttons along the bottom of the UserForm. I'm familiar with making them the same size and aligning tops. What I'm struggling with is how to distribute them horizontally. That is, to get the same amount of "white space" between them.
I need to get the code for a "copy" command button and "select all" command button. I need both for a text box.
Scenario: I click on the "select all" command button, it selects whatever is in the text box and then the "copy" command button copies all of that. So then I would be able to paste that in another program.
I've fought with this issue off and on for some time now and decided it was time to come to you for help. In the attached workbook there is a UserForm with five (5) command buttons along the bottom of the UserForm. I'm familiar with making them the same size and aligning tops. What I'm struggling with is how to distribute them horizontally. That is, to get the same amount of "white space" between them.
I have multiple Command Buttons on a spreadsheet that all require the same password when used. The password s contained in the code. Is there a way to have the password in hidden cell so if the password needs to be changed it can be change onetime and it will change all passwords. Below is the code I am using for the password.
Const strPass As String = "123456" Dim strPassCheck As String Dim lPassAttempts As Long, lCount As Long Do Until lPassAttempts = 3 lPassAttempts = 1 + lPassAttempts
I have a workbook which employs 4 different userforms. Navigating thru the workbook, the user ends up at a sheet with 5 macro buttons, allowing them to choose from several different functions. I added these to the worksheet using the "forms" toolbar.
My question is this: Is there anyway to change the color of these buttons, as I can with the userform buttons? Under "format control" I can change size, font, even color of font, but I can't change the background color of the button itself. Is it possible to identify those particular buttons thru VBA and adjust it's format?
Code to create buttons on a userform. I have adapted his code to do what I want. The code he gave me was:
In the Class Modules:
All buttons when created are coloured yellow. When a button is clicked, it turns blue (to indicate that the button was clicked. However, my problem is that when another button is clicked, it also turns blue as coded. This means that both are showing blue colour. I want all other buttons to turn yellow and only the button clicked should turn blue.
I have a command button set up to gather information, then create a new sheet, and paste a copied button from another location to the new sheet. The command button that shows up on the new sheet is offset and not centered in the cell. It is centered in the cell where it comes from and the cells are the same size.
I noticed that if I copy a command button and simply paste it to a new sheet, it is offset just like this. I need it to not do this. If I have to make it write in a new command button and assign a macro to it, that is fine. I went with the copy/paste option to save time.
Now, before it becomes an issue, this is only a part of the full code, but it is running in it's own conditional loop. The other part works fine. And I tried changing the alignment in the cell to see if that was the issue. It was not.
Copied command buttons are offset in the cells they are pasted to.