Dear Friends,
In this macro I want to resize picture in same size. The macro is not giving any error but also not giving required output. Please solve my problem. The code is as follows:
Thanking you in anticipation.
Please Login or Register to view this content.
Mukesh
Last edited by Fotis1991; 09-11-2013 at 11:58 AM. Reason: added code tags..
Sorry Fotis. Now I'm attaching a file here for your kind reference to see where I'm wrong and why the output is not as per my requirement.
Sorry once again.
Thanking you in anticipation.
Mukesh
Mukesh
I am here for helping people and recently for take care to apply the rules of the forum.
So I make an effort-last one-for helping you and not punishing you. I'll put code tags in your post. Next time, you have to do yourself or else i'll block your thread.
I hope someone will be able to help you.
Good luck.
Regards
Fotis.
-This is my Greek whisper to Europe.
--Remember, saying thanks only takes a second or two. Click the little star * below, to give some Rep if you think an answer deserves it.
Advanced Excel Techniques: http://excelxor.com/
--KISS(Keep it simple Stupid)
--Bring them back.
---See about Acropolis of Athens.
--Visit Greece.
Hi, Mukesh,
maybe give this macro a run:
And maybe resize the pictures and give the rows a different RowHeight before running the code.Please Login or Register to view this content.
Ciao,
Holger
Use Code-Tags for showing your code: [code] Your Code here [/code]
Please mark your question Solved if there has been offered a solution that works fine for you
Dear Fotis,
Thank you very much and extremely sorry again. It will not repeat in future.
Mukesh
Did you see the saggestion in post#4?
Hello HaHoBe,
Thank you for guidance. It's working fine and my code also work. The problem is that the attached file is not rename the sheet, the photographs ar in sheet1 so the both macros are running without error and giving required output. But in my original file there the sheet is rename as 'Office' and sheet no. is 3.
I think that because of it the both macros are not giving desire output in my file. Suggestion please.
Thanking you in anticipation.
Mukesh
Hi, Mukesh ,
ActiveSheet will rely on the sheet which is on top in the Application - no matter how that sheet is called or what itīs CodeName is.
How should anybody know that youīre talking about your "real" workbook, not the one you attached as sample?Originally Posted by TO in opening post
Ciao,
Holger
Dear Holger,
Here is a sample file for your reference.
Thank you.
Mukesh
Hi, Mukesh,
when I run the code I get the very same result that you have noticed: no action is taken. Reason for that is that msoPicture is not recognised. If I alter the xlConstant msoPicture to 13 and run the code I get the resize to go:
Ciao,Please Login or Register to view this content.
Holger
Hi Holger,
Excellent! But a little problem to solve. After running the macro the picture resize but not align in center. They are left-right-left-right manner. I want to set all the pictures align center. These are the passport size photographs of members. One more thing that I didn't understand that the macro has finish resizing the pictures or not. How much time I have to wait for it. so I want to add a message 'Finished resizing photographs' to start next function.
Do set the picture align center
Add a message after finishing the macro mentionned above.
Just for my information, what the number 13 means in the code?
Thank you.
Mukesh
Hi, Mujesh,
as far as I know there is no command to center a picture in a cell so we need to calculate the width for the cell minus the width of the picture and the divide by 2 and offset that value from the left border of the cell.
New code:
msoPicture is part of the msoType Collection. All these values all have a Constant as Name as well as a Long as Enumeration, and the numeric value for msoPicture is 13. You might look that up either in the Object Browser (it should be in the MSDN as well). Still I canīt explain why msoPicture doesnīt work when 13 will.Please Login or Register to view this content.
HTH,
Holger
Hi Holger,
Excellent! Now it's working fine and and as per my requirement align center.
Thank you for solving my problem.
Mukesh
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks