HELP.

  • Thread starter Thread starter uobt
  • Start date Start date
U

uobt

i need a vba script that will select any cell interiorcolor = 36
and then copy special paste value?
 
Help is a lousy subject line and your explanation leaves a lot to mind read
over. Could you try again.
 
UOBT,

Try something like this . . .

Sub CopyData()
Dim Rng As Range
For Each Rng In Range("A1", "A10")
If Rng.Interior.ColorIndex = 36 Then
Rng.Copy
Rng.Offset(0, 2).PasteSpecial Paste:=xlPasteValues
End If
Next Rng
End Sub

You will need to change the copy destination to fit your needs.
 
or

for each c in selection
if c.interior.colorindex=36 then c.formula = c.value
next c
 
You must log in or register to reply here.

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Clear Shaded cells 8
Fill cell values on Interiorcolor conditions 2
Interior Cell Colour - Conditional Formatting 3
vba powerpoint pasting named shape in selected named slides 0
Range: changing interior color 4
color function 5
want to track time while paste value in multiple column of same roe 1
Add a new row in Named Table (Table1) and add data from txtboxes into last empty cells based on header named of the Table1 0

Back
Top