Hello! I believe that the title pretty much covers what I'm intending to do, but I'll try to be more speciifc:
Is there any way where I can use VBA to change the active sheet's background, and by selecting any random file, to have its filename copied to a specific range (for instance, the filename would be "2000.png", so it'd copy "2000" to A1)? Thanks in advance
You mean the user selects a file, or the VBA selects a file at random?Originally Posted by Zenarte
Thank you for the reply, 6StringJazzer! In that case, the user would select the desired file
Hello again, I'm still looking for ways to do achieve that and I still haven't found out if it's possible or not.. Is it really impossible? Thanks
Re: "ActiveSheet Background"
What do you mean by that?
In the code, it sets the picture size to 10 columns wide and 45 rows height. Change as required.
You want the picture name in A1 but that would be obscured by the picture so it puts its name in Range("L1") = Cells(1, 12)
Change references as and where required.
Please Login or Register to view this content.
*unnecessary example removed*
Last edited by Zenarte; 03-27-2022 at 03:42 AM.
@Zenarte
YOU asked for a picture to be set as background and you example file is not telling use much, even the macro says noting.Now, one question that could come up is: why would I want to work with a picture set in the background, instead of just normally adding it to the sheet? The thing is that each one of these pictures that I have to work with are like grids. So I've configured the Excel for each one of the cells to overlap the image, just so I could easily identify the reference number for each individual square. I'll add a sheet as an example!
I thing you should take your time and rephrase your question, then read it yourself and think if someone that has no idea what you're trying to do would understand it too.
Last edited by Keebellah; 03-27-2022 at 03:27 AM.
---
Hans
"IT" Always crosses your path!
May the (vba) code be with you... if it isn't; start debugging!
If you like my answer, Click the * below to say thank-you
Keebellah, whenever you set a picture in the background, it utilizes the function "ActiveSheet.SetBackgroundPicture", right? All I wanted to know was to see if is it possible that whenever I click a button, or whatever, I can trigger this macro that will ask me to select a picture and set it in the background. And after I choose the file, the filename will be copied to the A1 cell. That's pretty much it
Everything else is covered, I just uploaded this example to give you an idea about what I'm working with, but it's really unnecessary. If you can help me clarifying that doubt, I'd be really grateful, thank you
Does this mean that you want an image you select to be set as background and the name of that file in cell A1?
Only the filename or also the path of that selected file?
But setting the mimage as background will not only set it the the area you colured balck it will be the entire sheet and probably tiled if its small
Keebellah, thank you for your reply. Yes, if I choose the file "2000.png" as an image in the background, for instance, then it'd be cool if the "2000" value would be automatically written on the A1 cell. Only the filename would be necessary
I really appreciate your concern and ways that could improve the work, it's just that I couldn't think of an easier way to detect anomalies on those image files, so I've came up with this solution
Last edited by Zenarte; 03-27-2022 at 04:01 AM.
Okay, clear, I'll work on an idea and post it when it's ready.
Bom d燰
Keebellah, I really appreciate your patience and attention. Thank you and goedemorgen
Place this code in one of the empty modules you already have there
You can then add a button to your sheet and link the macro to this button (Insert_Picture)Please Login or Register to view this content.
Wow, this is perfectly working and will definitely help me save a lot of time, thank you very very much, Keebellah and jolivanes!
Muito prazer,
Happy coding😀
Thanks for letting us know that all is well en een prettige dag verder allebei.
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks