hi... i have tried to hide hyperlink sheets in vba. i have used this programming, Dim shtname As String shtname = Left(Target.SubAddress, InStr(1, Target.SubAddress, "!") - 1) Sheets(shtname).Visible = xlSheetVisible Sheets(shtname).Select i have applied same code but it is not working. it shows choose some macros enabled file. my sheets name are ventilation, transitional, minimum ventilation, management. please guide me Regards
I want to apply this coding for Accounting like ledger. I prepared folio no. and used hyperlink to search specific sheet where account of people. and back to index sheet. But it doesn't working. there are many sheets already for other purpose inside entire workbook.
Hi dear Sir Can u explain me about hidden sheets due hyperlink when we have a form table in query command with several sheets Note: if it possible without of vba best regard Suhial
I have applied below linkto = Target.SubAddress wherebang = InStr(1, linkto, "!") If wherebang " WRITE GRATER SYMBOL"0 Then mysheet = Left(linkto, wherebang - 1) Worksheets(mysheet).Visible = True Worksheets(mysheet).Select myaddr = Mid(linkto, wherebang + 1) Worksheets(mysheet).Range(myaddr).Select End If But it is not working.
Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink) Worksheets("sheet1").Select Target.Parent.Worksheet.Visible = False End Sub Private Sub Worksheet_SelectionChange(ByVal Target As Range) End Sub SIR ESA KRNE PAR SECOND LINE YELLOW AA RHI H OR RUN TIME ERROR 1004 DIKHA RHA HAI AUTO HIDE NHI HO RHI SHEET
Thank you very much sir, this really helped me in doing my assignment. keep working, I hope your channel will be successful.
Does it allow to change data in hidden sheet after providing hyperlink
Yea
Sir, I want to apply this programme for my requirement. Will be it work or will have to change words as per my report name.. please tell me
You have to change name as per your sheet name
hi...
i have tried to hide hyperlink sheets in vba. i have used this programming,
Dim shtname As String
shtname = Left(Target.SubAddress, InStr(1, Target.SubAddress, "!") - 1)
Sheets(shtname).Visible = xlSheetVisible
Sheets(shtname).Select
i have applied same code but it is not working. it shows choose some macros enabled file. my sheets name are ventilation, transitional, minimum ventilation, management.
please guide me Regards
Send your sheet
er.manoj101@gmail.com
@@manojkumarexcel ok I’ll thanks for response
Welcome
@@manojkumarexcel i have sent you an email kindly check and response please
@@manojkumarexcel have you please checked my file??
I want to apply this coding for Accounting like ledger. I prepared folio no. and used hyperlink to search specific sheet where account of people. and back to index sheet. But it doesn't working. there are many sheets already for other purpose inside entire workbook.
Thanks for giving your feedback
Cont me Or send your sheet to
er.manoj101@gmail.com
@@manojkumarexcel I've sent my sheet can you help to solve my problem
Please check the latest one in mail/
Ok
Can you send one more times
Hi dear Sir
Can u explain me about hidden sheets due hyperlink when we have a form table in query command with several sheets
Note: if it possible without of vba
best regard
Suhial
Sure
Share me your sheet
er.manoj101@gmail.com
Sir, I follow all steps , it's working but closed the save sheet and reopen then it's not working
Save as macro enable sheet
Dear sir,
I followed all the steps, but when i hide the sheet does not access
sir, can you please explain same concept in ms word to make one paper index for a book .
Sure
Dear Sir, I am getting Runtime error 9 if i am applying the code
Contact me
er.manoj101@gmail.com
@@manojkumarexcel Sent You one email Sir Yesterday from Pradeep Moharana mail Id
Sir kya hm kisi linc ko MSG ke andr hide kr skte h
I have tried many times but not been successful. Help to fix this issue
contact me
er.manoj101@gmail.com
Same here please help me too
Apne sahi btaya hai but jab mai application karta hu to mujhe error show ho rha hai kya kare VBA coding ko save karta hu to nhi save hota hai
Contact me
excelgurumanoj@gmail.com
@@manojkumarexcel ok sir
I have applied below
linkto = Target.SubAddress
wherebang = InStr(1, linkto, "!")
If wherebang " WRITE GRATER SYMBOL"0 Then
mysheet = Left(linkto, wherebang - 1)
Worksheets(mysheet).Visible = True
Worksheets(mysheet).Select
myaddr = Mid(linkto, wherebang + 1)
Worksheets(mysheet).Range(myaddr).Select
End If
But it is not working.
Sheet is not unhiding
Contact me
er.manoj101@gmail.com
I have tried but the Syntex is not working
Contact me
er.manoj101@gmail.com
sir google sheet ka batiyen
excelgurumanoj@gmail.com
sir not working
Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
Worksheets("sheet1").Select
Target.Parent.Worksheet.Visible = False
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
End Sub
SIR ESA KRNE PAR SECOND LINE YELLOW AA RHI H OR RUN TIME ERROR 1004 DIKHA RHA HAI AUTO HIDE NHI HO RHI SHEET
Contact me
excelgurumanoj@gmail.com
No
Not working
Contact me
excelgurumanoj@gmail.com
Its not working Sir
Can u share me your sheet we need to see why not working
er.manoj101@gmail.com
Nhi huwa sir
Thanks for your feedback
Send me ur file
er.manoj101@gmail.com
We need to see why not working
@@manojkumarexcel office vr 2007 me
Ok share ur file