Search results

Actually i need the logic to execute the code after running the for loop with "wsDict.Add Worksheets(i).Name, CStr(i)"

Sub test() Dim wsDict AsObject, i asInteger Set wsDict = CreateObject("Scripting.Dictionary") For i = 1 To Worksheets.Count wsDict.Add Worksheets(i).Name, CStr(i) Next Worksheets(wsDict.Keys).Select EndSub Sorry here it is

Hi Chihiro, Sub test() Dim wsDict AsObject, i asInteger Set wsDict = CreateObject("Scripting.Dictionary") For i = 1 To Worksheets.Count wsDict.Add Worksheets(i).Name, CStr(i) Next Worksheets(wsDict.Keys).Select EndSub In the above code, once it is executed, after for loop and before...

Thank you for your reply. But i tried already Each time the image name is different...

@Monty, I'm trying my best. Now i'm struck with deleting the picture that is created I have copied the required display rage and pasted as image file but unable to find it to delete the same Kindly advise

Yes got it I will try thanks

@Monty Thanks for your reply. I will try if it is possible to DELETE the created IMAGE file every time while running this macro I have 26 sheets Each sheets needs this action For each click one image will be created So need to delete that newly created image every time after closing that...

Dear all, Kindly advise how to make the display in the user form in the format as same in the sheet cells Required is SIZE of the cells/ gap shall be same not even the colours Need to have same ROW size while appearing in the user form. Thanks

Great Thanks a lot It fulfills my requirement Thanks for sharing your expertise Regards Govind

@Pcosta, Really a great Thanks for you help.... Could you please advise the changes .... This is 100% perfect and it is working for me.... Thanks Govind

@ PCosta Thanks for your reply sorry for bothering you Actually the pop-up requirement is to HIDE the other sheet content and getting the display of the required portion of the selected sheet while clicking the icon.... Thanks once again for help... Govind

@Pcosta, After fine tuning, i have some issues. Please refer to the uploaded file. While calling the code from other sheet it is not doing the job, kindly advise The image to be displayed is in next sheet but the active sheet is different in such case the required cell content is not displayed...

@Pcosta, Thanks for sharing your expertise Thanks a lot

Pcosta, Its working in my original workbook after copying the chart in A1:A2 What is behind A1:A2 THANKS A LOT Great help Regards Govind

@Pcosta, Yes it is working good. Thanks for your help Please help to transfer the code into my original file I have exported the userform and code module into original file again it shows same error. Kindly advise what needs to be transferred to the new file to make the code work. Chart in...

Dear PCosta, Thanks for your help. It is ok if there is one sheet. I have attached the file that contain more than one sheet. Actual file has around 20 sheets. This operation has to be performed in all 20 sheets, Kindly advise, how to go with. Regards Govind

Dear PCosta, Thank you for your reply. Sorry for uploading the password protected file. Attached is the file Kindly advise the solution Regards Govind

Dear PCosta, Attached is the file that shows error. Kindly advise Govind

PCosta This is not working in the file that contains already other objects for other Kindly advise Code needs to identify the object that is crossing the selection Pl do the needful I'm getting Below error

PCosta Thanks a lot.... Yes this is the solution i needed... Thanks once again Govind

Dears, Is there is any way to capture range of cells and display the captured region as a picture in a window in user for such that after display it can be closed by the user. Please advise. Sub Macro4() Sheets("Sheet2").Select Range("C2:F14").Select Selection.CopyPicture...

Yes it is working THANK YOU SO MUCH Marc Regards Govind

Dear YasserKhalil, Thank you Actually i'm looking for the history of sheets internal to a workbook so the history has to store the previous work'sheets ' in each cell..in any one of the sheet Dear Marc, Thanks for your suggestions I'm trying my best ,.. Regards Govind

Dears, Is there is any way to keep the history of last seen sheets in workbook containing more than 100 sheets ---- in a separate sheet called historysheet Say i have sheet1 sheet2 sheet3....sheet100 if sheet1 is activated then the A1 cell in the sheet named "historysheet" will be updated...

This code is working for me (taken from example worksheet from other thread by HUI -> Sample_file_pk_Hui.xlsm Sub preview() UserForm1.ListBox1.ColumnCount = 5 UserForm1.ListBox1.List = Worksheets("Sheet1").Range("A1:E10").Value UserForm1.Show End Sub