Code - trim filename

staticbob

Well-known Member
Joined
Oct 7, 2003
Messages
1,079
Guys,

I am using this code to get an open workbook from the user. This is then stored in the string PWB. I now need to trim the "C:\" off this string ?

Thanks
Bob

"C:\Hanley Road Project Workbook.xls"

Code:
Private Sub UserForm_Initialize()
Dim wb As Workbook
For Each wb In Application.Workbooks
Me.ComboBox1.AddItem (wb.FullName)
Next wb
End Sub

Private Sub CommandButton1_Click()
Dim PWB As Workbook
Dim UGWB As Workbook
Set UGWB = ActiveWorkbook

PWB = ComboBox1.Text
If PWB = "" Then
    MsgBox ("Please select a Workbook to upgrade ! Numpty")
    Exit Sub
End If
Call upgrade_forms(PWB, UGWB)
Unload Me
End Sub
 

Some videos you may like

Excel Facts

What is the shortcut key for Format Selection?
Ctrl+1 (the number one) will open the Format dialog for whatever is selected.

Watch MrExcel Video

Forum statistics

Threads
1,122,335
Messages
5,595,573
Members
413,996
Latest member
mabelO

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Top