I'm "slightly" confused by your example.
For your records:
| A | B | C |
| apr | C:\Users\pwloo\Desktop\break\goal\apr\2F6KB026 | 2F6KB026 |
Is the value in column "B" a folder? or a filename with path?Is the value in
column "C" a FILE that just happens to be the same name as the last folder name
in "B"?
If "B" is an actual folder, then this change to your sub should work:
Sub sbOpeningAFolder() Dim FSO Dim sFolder As String If
ActiveCell.Column = 3 And ActiveCell.Row > 5 Then sFolder =
Cells(ActiveCell.Row, "B").Value Set FSO =
CreateObject("Scripting.FileSystemObject") If Not
FSO.FolderExists(sFolder) Then MsgBox "Specified Folder Not Found",
vbInformation, "Folder Not Found!" ElseIf FSO.FolderExists(sFolder) Then
Call Shell("explorer.exe " & sFolder, vbNormalFocus) End If
End IfEnd Sub
Paul-----------------------------------------
“Do all the good you can,
By all the means you can,
In all the ways you can,
In all the places you can,
At all the times you can,
To all the people you can,
As long as ever you can.” - John Wesley
-----------------------------------------
On Thursday, January 7, 2016 11:43 PM, Kat <katherine...@gmail.com> wrote:
Hi all,
I was wondering how could I make the open folder button for file name column
instead of file location path column? For instance, from the picture below,
when I point my cursor to C:\Users\maggie\Desktop\coke\diet\apr\2F6KB026 and
click open file button, it will open the file 2F6KB026. At the moment, I would
like to open the file 2F6KB026 by pointing my cursor to 2F6KB026. Please see
attached for the vba code.
Thanks in advanced.
Cheers
--
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s
=TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @
https://www.facebook.com/discussexcel
FORUM RULES
1) Use concise, accurate thread titles. Poor thread titles, like Please Help,
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get
quick attention or may not be answered.
2) Don't post a question in the thread of another member.
3) Don't post questions regarding breaking or bypassing any security measure.
4) Acknowledge the responses you receive, good or bad.
5) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.
NOTE : Don't ever post confidential data in a workbook. Forum owners and
members are not responsible for any loss.
---
You received this message because you are subscribed to the Google Groups "MS
EXCEL AND VBA MACROS" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at https://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.
--
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s
=TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @
https://www.facebook.com/discussexcel
FORUM RULES
1) Use concise, accurate thread titles. Poor thread titles, like Please Help,
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get
quick attention or may not be answered.
2) Don't post a question in the thread of another member.
3) Don't post questions regarding breaking or bypassing any security measure.
4) Acknowledge the responses you receive, good or bad.
5) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.
NOTE : Don't ever post confidential data in a workbook. Forum owners and
members are not responsible for any loss.
---
You received this message because you are subscribed to the Google Groups "MS
EXCEL AND VBA MACROS" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at https://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.
