Free Microsoft Excel 2013 Quick Reference

Remove Title Bar From UserForm

Hi,

does anyone know how to remove the title bars on userforms? I cant work it out for the life of me, thanks

Rich


Post your answer or comment

comments powered by Disqus
Is there any way to remove the blue bar from the top of a userform when it appears?

Thanks

Hi is there any way that i can remove the excel title bar and scrolling tabs so that the excel sheet do not resemble an excel document? Thanks b4

Is it possible to take the headers of a UserForm. I mean the bit that can have a form name and the little cross on the top right hand corner.

Can this be done, like in Access?

How can I remove the formula bar on excel 2007 using vba. I have a pivot table and I don't want to display the cell contents in the formula bar. If I do hide/lock cells and protect sheet, than the pivot table cannot be updated. I was hoping to somehow remove the formula bar from the ribbon for this particular file.

Hello,

Is it possible to put the full path name of the opened file in the bleu
title bar from excel, this always en automatically.

--> Microsoft Excel - c:/data/stefan/filename instead of Microsoft Excel -
filename

Many thanks
Stefan


Hi there, I have this question:

I was sent a spreadsheet with all the bar charts. Data are not present
and data link is broken. Now I want to eliminate useless bars and only
leave out useful bars on the bar chart. I tried to select the bar I
don't want and delete, but it will delete all the bars. Can someone
teach me how to just delete 1 or 2 bars from the bar chart? Many thanks

in advance!

Hello,

Is it possible to put the full path name of the opened file in the bleu
title bar from excel, this always en automatically.

--> Microsoft Excel - c:/data/stefan/filename instead of Microsoft Excel -
filename

Many thanks
Stefan

i am able to remove the title bar but unable to move the userform now.
plzz help .....

Good morning/evening!

I was wondering if there are any ways to alter the type of title bar on a userform window, or better still, remove it completely? Is this a shell patch maybe?

thx

Leith Ross provided a brilliant post (Many thanks Leith) which would work perfectly for a project that I am currently working on, the post is below:

http://www.excelforum.com/excel-prog...-userform.html

I am trying to amend Leith's code in order to remove the row source from the listbox1 results. So the columns in the listbox1 would only display, Job, Job Title and PM.

I attach my example workbook, which is what I have managed to amend so far but I am struggling to amend it to work. Please can anyone help as I am a complete novice when it comes to this and trying to learn all the time.

Many thanks for taking the time to read my post and any help and assistance would be greatly received.

I have an Excel file with various userforms created in VBA. Is there a way to change the format (specifically, the color) of the title bars?

Thanks in advance.

My Workbook has several Worksheets. It opens up on a Title Page from which
the viewer can navigate to other Worksheets. Is it possible to remove the
Scroll Bars and Tool Bars on this Worksheet only, thereby giving the Title
Page a more pleasing look and not affecting the other Sheets?

____________________
Crime Pays...
Unless you''re a motorist!

Is it possible via VBA code to minimise a UserForm to the taskbar without a title bar on the UserForm (I know there are workarounds using API to do this but only if you have a title bar)?

~Liam

Hi all,

I need to hide the UserForm Title Bar, I know how to disable the Close
button; but for a special project I want to display UserFormswithout any
options or a title.

If anyone knows a way to do this let me know; your assistance would be
greatly appreciated.

Yours sincerely,

Brent McIntyre

*** Sent via Developersdex http://www.developersdex.com ***

Hello,

I am looking for some help on removing controls on a userform that were created dynamically (see part of my code below). I get a message that this method can't be used in the context.

My aim: I've got a text box on my userform. If the user enters a number, the corresponding number of controls (ComboBoxes) is created. By default, the form has three ComboBoxes (through initialize). These should be removed entirley before adding new ComboBoxes.

Any directions would be very much appreciated!

Urs


	VB:
	
 
Dim neuer_schalter As MSForms.Control 
 
 'creating controls
For i = 1 To j 
     'Comboboxen für
    Set neuer_schalter = RBEI_3_Splitting.Controls.Add("forms.ComboBox.1") 
    With neuer_schalter 
        .Height = 18 
        .Width = maximum2 + 90 
        .Left = 10 
        .Top = abstand_oben + i * 22 
        .List = CB_liste 
        .Value = CB_liste(0) 
    End With 
Next 
 
 'removing controls
For Each neuer_schalter In RBEI_3_Splitting.Controls 
    If TypeName(neuer_schalter) = "ComboBox" Then 
        Me.Controls.Remove neuer_schalter.Name '"ComboBox1"
    End If 
Next 

If you like these VB formatting tags please consider sponsoring the author in support of injured Royal Marines


I've found a link on OzGrid "How to remove the (X) CloseButton from Userforms" but I can't seem to get it to work with Excel 2003. The code looks like it was written for Excel '95, '97 and 2000. Would anybody be able to help me get it to work for Excel 2003 or am I just not doing something correct? Spreadsheet attached. Thanks in advance.

Hi All,

I am building an application and want to force users to administer via a userform. Using the web I've developed various components (e.g. Chip Pearson's disabling of Max/Min icons) but one problem remains.

Even with the Workbook protected, double clicking the Excel - not Workbook - Title Bar enables the Ribbon.

Possibly it's a sequencing issue. Have searched for a suitable fix; any thoughts would be welcomed.

Cheers,
David

Hi there,

Is it possible to change a user form title bar colour from the default blue?

Thanks in anticipation

Red

Hey,

could anyone give me the code to remove the titlebar of a userform in Excel/VBA.

Remove meaning the program user must not beable 2 see the titlebars..

Kind Regards,

RonaBlaze

Oh wise ones,

Is it possible to display the value of a cell in the Excel title bar or the
system tray. You can see what I'm getting at, monitoring the value of a cell
while excel is minimized. This value is constantly changing every 2 seconds
from a sheet calculation macro, so the Title/Tray would have to change
dynamically.

Mike

Several other programs that I use mark dirty files with an asterisk in the title bar. Is there any way to get the same functionality in Excel?

I've written the code below, and it does what I want, but it has to be inserted into each workbook. I'd much rather have something in my personal.xls background VBA project - any suggestions? Or, is there some other approach to getting Excel to do it? I know I can stick this in my blank template and I'll be good from here out, but it'd be nice to get the same results in existing workbooks.

Sub Workbook_SheetChange(ByVal Sh As Object,
ByVal Source As Range)
Application.Caption = "*"
End Sub
Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Application.Caption = ""
End Sub
Thanks!
-Mark

I would like to remove the menu bar from the top of a workbook that I send to
customers to plan our projects. Is this possible without effecting other
workbooks I use.

I would also like to add custom tabs or buttons at the top of the page to
better navagate through the workbook.

Where can I find this information?

Recently I downloaded an Excel file with a list of DTV converters. This file opened up with a band on the left side that had two plus signs on it. Clicking on the top one did the same thing as Page Down would do, and clicking on the plus sign below it did the same thing as two Page Downs. This has not shown up in any other Excel file.

On the other hand, the Active Title Bar(?)(the one on top with the three little boxes on the right hand corner for minimize and exit) has disappeared completely regardless of which file I open. This is a real pain because there is no way to minimize the Excel screen from its full size.

Would any of you have any idea about either of these two things. Thank you, muchly

I'm really excited beacuse I've just learned how to remove the title bar from
a form in vba - thought I'd better share. You need to use windows API calls
so I suppose it's not strictly vba but very exciting nevertheless. It's going
to be splash screens a-go-go for my addin's from now on.

Simply add the following code to a new form in excel.

________________________________________________________________

Private Const GWL_STYLE = (-16)
Private Const WS_CAPTION = &HC00000
Private Const WS_MAXIMIZEBOX = &H10000
Private Const WS_MINIMIZEBOX = &H20000
Private Const WS_SYSMENU = &H80000

Private Declare Function FindWindow Lib "user32" Alias _
"FindWindowA" (ByVal lpClassName As String, ByVal _
lpWindowName As String) As Long

Private Declare Function GetWindowLong Lib "user32" Alias _
"GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex _
As Long) As Long

Private Declare Function SetWindowLong Lib "user32" Alias _
"SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex _
As Long, ByVal dwNewLong As Long) As Long

Private Declare Function SendMessage Lib "user32" Alias _
"SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, _
ByVal wParam As Integer, ByVal lParam As Long) As Long

Private Declare Function DrawMenuBar Lib "user32" (ByVal _
hwnd As Long) As Long

Private wHandle As Long

Private Sub UserForm_Initialize()
Dim lStyle As Long

If Val(Application.Version) >= 9 Then
wHandle = FindWindow("ThunderDFrame", Me.Caption)
Else
wHandle = FindWindow("ThunderXFrame", Me.Caption)
End If
If wHandle = 0 Then Exit Sub

lStyle = GetWindowLong(wHandle, GWL_STYLE)
Me.Caption = ""
lStyle = lStyle And Not WS_SYSMENU
lStyle = lStyle And Not WS_MAXIMIZEBOX
lStyle = lStyle And Not WS_MINIMIZEBOX
lStyle = lStyle And Not WS_CAPTION

SetWindowLong wHandle, -20, frm
SetWindowLong wHandle, GWL_STYLE, lStyle
DrawMenuBar wHandle
End Sub

__________________________________________________________________

- Rm


No luck finding an answer? You could always try Google.