Test Cell for Value of 1st letter and Insert Shape (Check Mark)

John.McLaughlin

Board Regular
Joined
Jul 19, 2011
Messages
169
Hello!

My cell contains an Index Match, I want to test for the .Value of the Index Match, then insert a Check Mark. My statement keeps testing the formula.

Code:
Range("A12").Select
 If (Left(A12, 1) = "_") Then
    ActiveSheet.Pictures.Insert( _
        "C:\Images\Red-Checkmark.png").Select
 Else
 End If


The column is simple checklist populated by a product code. Almost every product has a different number of items to check off. I only want to insert the checkmark in the cells containing the 1st character "_", the underscore,

e.g.

____ Widget 1
____ Widget 2

Any ideas? Thanks in advance!
 

Excel Facts

Which came first: VisiCalc or Lotus 1-2-3?
Dan Bricklin and Bob Frankston debuted VisiCalc in 1979 as a Visible Calculator. Lotus 1-2-3 debuted in the early 1980's, from Mitch Kapor.
How about
VBA Code:
 If (Left(Range("A12"), 1) = "_") Then
 
Upvote 0
Solution
You're welcome & thanks for the feedback.
 
Upvote 0
Now I am researching how to indent the shape. (checkmark) It places the checkmark in the left most position, any suggestions to move the shape in 1 space?

Thanks in advance!
 
Upvote 0
As that's a totally different question, it needs a new thread. Thanks
 
Upvote 0
Sorry, I got excited and posted the new question without thinking :)

I may just edit the graphic!

Fluff, your knowledge and kindness is appreciated!
 
Upvote 0

Forum statistics

Threads
1,213,546
Messages
6,114,251
Members
448,556
Latest member
peterhess2002

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top