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
 

Excel Facts

Back into an answer in Excel
Use Data, What-If Analysis, Goal Seek to find the correct input cell value to reach a desired result
Master Excel Bundle

Excel contains over 450 functions, with more added every year. That’s a huge number, so where should you start? Right here with this bundle.

Forum statistics

Threads
1,168,025
Messages
5,856,912
Members
431,837
Latest member
megantang

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