Userform :: Menu Image Is 'dragged' Across The Screen
Oct 8, 2007
I currently have a VB macro written where under certain conditions user forms are shown for the user to select options, display messages, etc. When any of these forms are on the screen, and someone drags them, the menu image is 'dragged' across the screen. Is there a way from preventing this from happening?
stretch" the userform to fit the height and width fo the screen. I dont want to simply change the height and width of the userform, i want the controls within the userform to stretch with the userform so that it looks the same, just fullscreen. this is what ive found by googling:
VB: With Application .WindowState = xlMaximized Zoom = Int(.Width / Me.Width * 100) Width = .Width Height = .Height End With
however, this just stretches it to match the width of my screen, but doestn consider the height, so that if i have a widescreen vs a square screen it will cut off the bottom of my userform. It would be great if there was a zoom type featur that zooms the vertical and horizontal dimensions seperately... more like a stretch than a zoom.
I have a UserForm that I want to use as a Password screen The form has a label, CommandButton and TextBox.
When I run the UserForm, IF you click OK without entering the Password, you still gain access to the Workbook! IF you type in the wrong Password you still gain access to the Workbook and NO "Invalid password!" message pops up.
What I would like to happen IF the CommandButton is clicked without entering the Password, is for the Workbook to close, and IF the Password is correct, I want to load Useform2
I am using the following code provided by rorya, that I got from here..... http://www.mrexcel.com/forum/showthr...light=password
[CODE] Option Explicit Private Sub CommandButton1_Click() Me.Hide End Sub Private Sub UserForm_Initialize() Me.TextBox1.PasswordChar = "*" End Sub Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer) Me.Hide End Sub
Sub Mycode() Dim frm As UserForm3 Set frm = New UserForm3 frm.Show If frm.TextBox1.Text = "Password" Then ' run your code Else MsgBox "Invalid password!" End If Unload frm End Sub [CODE]
is there a way i can make my user form in full screen? i already drag it to it's full screen but i still can see the blue tool bar with X (close) button i also want to run the macro when i open the file i want it to run automatically with full screen....
I'm having trouble centering my UserForms on the screen. I have tried all the options on the StartUpPosition in the Properties windows and the closest I can get is vertically centered but on the far left. The annoying thing is that it was working (both vertically and horizontally centered) but when I changed the defaults of the option buttons they moved to the position I described. I have two monitors (but excel is maximised on one monitor only) could this have something to do with my problem? If so why did it work before?
I have a code that generates a URL for an image (on the internet, not on the local machine) and I would like that picture to be displayed within a userform (preferably at it's original resolution).
I am rotating an image on a userform by uploading different gif images to simulate the rotation. There is an annoying screen flicker around the image when changing images that I would like to get rid of if possible. how to get rid of the flicker or a different technique I could use to rotate an image? 1st attempt - uploading different pictures
For h = 1 To Sheets("Bar Contents"). Range("B" & ItemRow) Step 1 PictureLocation = ThisWorkbook.Path & "PicturesTransparent" & Sheets("Bar Contents").Range("C" & ItemRow) _ & " " & h & ".gif" GameUserForm.DrinkAnimation.Picture = LoadPicture(PictureLocation) Sleep 50 DoEvents Next h.........................
Is there any way to tell a userform to always open in the center of the excel screen? It always seems to open somewhere in outer space on multiple screen setups.
Some time ago (not sure how long ago) I created a splash screen that comes up when I first load a particular workbook. There was only one worksheet in the workbook and at that time the data in the worksheet was not so relevant and hardly ever used. That workbook name is "Employees" and the worksheet name is "EmpData". Subsequently, the worksheet ("EmpData") in the workbook "Employees" has became relevant to a new workbook named "Payroll" I created. This workbook is used all the time. It had four different active worksheets.
I realized last week that the data in "EmpData" was very relevant to the work in the "Payroll" workbook so I copied "EmpData" worksheet in it's entirety to the "Payroll" workbook as a fifth worksheet using the same name as before, "EmpData". Now each time I open the "payroll" workbook the splash screen shows up and hangs around for several seconds or longer. It has become quite irritating and I want to delete it.
I'm launching a main form from a menu I've added. I want to make the form modal. From that form, the user can launch several other forms (that I also want to be modal). If any of the forms are modal, then the Excel sheet that is visible in the background does not refresh. If the form is moved at all it creates a dragging pattern on the screen and hides the spreadsheet. That's not so bad, except when I get to either a second or third level form and start closing them. They're still visible even though the previous level form is now on top. Most of the forms get bigger the deeper you go into the data entry process. So, as you close them and move back up the chain, it gets very confusing. If I simply make the forms modeless, it refreshes fine. I've tried using Application. ScreenUpdating = True and Me.Repaint with no success. I couldn't figure out where to put the Me.Repaint since there isn't a UserForm_Move event.
I want to insert image on my userform, but I have problems with It. Image is originally .png and has no background, which is what I need.
Excel doesn't allow me to use .png, so I had to convert It to .jpg, but then background is included. Even that would be o.k., If I could somehow change picture background to "&H8000000F&" system colour, but failed to do that also.
So I tried with converting file to .ico, and again Excel recognizes It as invalid picture.
I just want to insert image, and leave background same colour as Userform.
in a userform in Excel. As you might have guessed, I've created a macro that, depending on user inputs, can take a bit of time to run, and I want to display something to let the user know that Excel hasn't locked up. Ideally, this would be a sort of faux status bar like the one above that implies that there is work being done without necessarily actually indicating the amount of work completed (I figure that would be easier to code).
Do you have any recommendations about how to accomplish something like this? Ideally also I'd like to not have to download anything in order to make this work, as the spreadsheet is designed for others to use, so it would be inconvenient if they had to install an add-in or similar to get it to run.
I am looking to if there is anyway to move an image box using a mouse drag and drop action. I have put together a little example of what I am trying to work with and was wondering if anyone on here had any tricks to make this work.
I realise the drag and drop method only applies to the textbox and listbox but have seen some old code that can simulate the drag and drop by creating a border of some sort to illustrate where the image box is going to be placed and final just setting the properties of that image box to where the border is placed.
In the example type in a size in the width and height textboxs (I used 3000,3000) and then what I want to do from there is move the white box using the mouse within the blue box.
i have a textbox on top of a picture box but i cannot replicate it with a new textbox or combobox. when i place the control on the picture box it disapears?
i'm trying to build a GUI-only application using Excel Userforms, with File and Help menus on the form. i'm coming from Java where i know getting a menu on a GUI is possible, but i haven't seen any resources for it in VBA Excel Userforms. is it possible to place menu items in a userform?
How can i paste a picture from a workbook to my userform image control? Without having to create loads of code for this to be done? Ive tried something like this
[Code] .....
And cant get anywhere near doing what i want it to do.
I have an image box on a userform in Excel VB. Is there ANY WAY to load an image into this image box from an object that I have loaded into an excel worksheet something like
If userform1.checkbox1=True Then userform1.image.picture = loadpicture (Worksheets("Sheet1").shapes("Object 1")) ElseIf userform1.checkbox2=True Then userform1.image.picture = loadpicture (Worksheets("Sheet1").shapes("Object 2")) Else msgbox "No image" Endif
I would like to create a simple right mouse button popup menu for the text box on a userform. I just want Copy and Paste and the functionality that goes with them if possible.
I used the commandBar to create a right-click menu on a userForm but unfortunately I get an error 400 every time I click on the option "Edit" and I don't understand what I did wrong.
Sub CreateCmdBar() Dim st As CommandBar 'delete the pop-up if it exists On Error Resume Next Application.CommandBars("flexgrid_rc").Delete 'Disables enabled error handler in the current procedure and resets it to Nothing. On Error GoTo 0 On Error Goto 0 Set st = CommandBars.Add( Name:="flexgrid_rc", Position:=msoBarPopup, Temporary:=False) 'add two menu items to the new commandbar With st..................
I have one Popup Menus in Userform, But i want to to Open Popup menu in Specific Position in userform, In Fixed Position,i want to specific a position which opens Popup Menus in Userform.
I am working on a time table worksheet and I need to insert a time Offset that can range from 5 minutes to an hour with 5 minute increments. The message box or user form will prompt, "How long is your Offset:"
The problem is that I only know how to do make a drop down list that is populated from cells on a sheet. Do I have to use a user form?