-
Apr 4th, 2007, 03:57 AM
#1
Thread Starter
Hyperactive Member
[RESOLVED] VBA ThisWorkbook.Path problem
I have a Workbook which writes the results to another spreadsheet which
is saved in a folder under the one in which it resides.
I have been using the folowing code to build up the filename for the results
spreadsheet :-
VB Code:
ThisWorkbook.Path & "\Archive\" & ArchiveWbkName
This was working fine, then I discovered that some of the users developed
problems when they created a shortcut on the desktop for launching the
Initial Workbook.
For them the ThisWorkbook.Path is returning the path of their Desktop.
i.e.
C:\Documents and Settings\xxxxx\Desktop
instead of the path where the Workbook is actually stored, i.e.
T:\Reports\Excel\DailyUpdates
Is there any way I can retrieve the correct Workbook's Path when someone
launches it from a shortcut.
Signature Under Construction
-
Apr 4th, 2007, 05:17 AM
#2
Re: VBA ThisWorkbook.Path problem
Hi Torc
I created a workbook in C: and in the worklbook open event i put this code
vb Code:
Private Sub Workbook_Open()
MsgBox ThisWorkbook.Path
End Sub
then I created a shortcut in the desktop and opened it and it gave me the message "C:" so I believe that creating a shortcut is not the problem...
Can you check three things for me....
1) Right Click on the shortcut and click on the properties see where does this shortcut point to?
2) Also it's unlikely but see if they have a 'copy' of the main file on the desktop?
and the last thing that i can think of....
This was working fine, then I discovered that some of the users developed
problems when they created a shortcut on the desktop for launching the
Initial Workbook.
3) Check the code (use msgbox to display the result) where the file is exactly being created....
hope this helps...
A good exercise for the Heart is to bend down and help another up...
Please Mark your Thread "Resolved", if the query is solved
MyGear:
★ CPU ★ Ryzen 5 5800X
★ GPU ★ NVIDIA GeForce RTX 3080 TI Founder Edition
★ RAM ★ G. Skill Trident Z RGB 32GB 3600MHz
★ MB ★ ASUS TUF GAMING X570 (WI-FI) ATX Gaming
★ Storage ★ SSD SB-ROCKET-1TB + SEAGATE 2TB Barracuda IHD
★ Cooling ★ NOCTUA NH-D15 CHROMAX BLACK 140mm + 10 of Noctua NF-F12 PWM
★ PSU ★ ANTEC HCG-1000-EXTREME 1000 Watt 80 Plus Gold Fully Modular PSU
★ Case ★ LIAN LI PC-O11 DYNAMIC XL ROG (BLACK) (G99.O11DXL-X)
★ Monitor ★ LG Ultragear 27" 240Hz Gaming Monitor
★ Keyboard ★ TVS Electronics Gold Keyboard
★ Mouse ★ Logitech G502 Hero
-
Apr 4th, 2007, 05:29 AM
#3
Thread Starter
Hyperactive Member
Re: VBA ThisWorkbook.Path problem
Hi koolsid,
Turns out the unlikely second thing was the culprit.
They had done a copy to their Desktop, instead of doing Create Shortcut.
They gave they Icon the name Shortcut to... which is what was confusing me.
The simple things confuse me too much.
Thanks.
Signature Under Construction
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|