• Hi All

    Please note that at the Chandoo.org Forums there is Zero Tolerance to Spam

    Post Spam and you Will Be Deleted as a User

    Hui...

  • When starting a new post, to receive a quicker and more targeted answer, Please include a sample file in the initial post.

Fill Data

Abhijeet

Active Member
Hi

I have data in Excel i want column A fill. In Column B to K If any value other than 0 then Fill Numbers in Column A I have show in my data with color i want cut paste the numbers in column A in attach file i show which numbers i want cut & where to paste.Please tell me how to do this
 
Hi

I have data in Excel i want column A fill. In Column B to K If any value other than 0 then Fill Numbers in Column A I have show in my data with color i want cut paste the numbers in column A in attach file i show which numbers i want cut & where to paste.Please tell me how to do this
 

Attachments

  • Book1.xlsx
    9.7 KB · Views: 6
Concerning last file, Book1-3

In B2:K2, there are numbers > 0, so I can see we transfer value from col L2 to A2. Ok, I can understand that.

In A6, again, looks like we transfer from L6. Again, so far, so good.

In A9, why is this number here? What does the arrow mean?

In A10, loks like we copy from L10, which goes with patten we saw with A2 and A6.

In A11, why is this number here? What does arow mean?
 
In color that cell i want to cut paste number actual data color cell no value that cell is blank arrow show from this cell cut data & paste tin color cell
 
Try this. To clear up some confusion, I tried to make a before & after worksheet to show what should change. Go to the Before sheet, and run the macro, and it should change into what you need.
 

Attachments

  • MoveNumbers.xlsm
    16.2 KB · Views: 3
Hi Luke M

Its work Perfect only things is it is possible to Color cell which cell cut paste the value. and which cell move up that info is next sheet
 
Hi Luke M

Its work Perfect only things is it is possible to Color cell which cell cut paste the value. and which cell move up that info is next sheet
I'm afraid I don't understand wha you said. You want to color the cells that got pasted into? Or the cell that got cut? Or both?
 
If u can give both cells Color Which cells Cut the data & where to paste the data 2 different color then i can understand from this cell data paste in to that cell
 
Ok, changed macro to mark the cells with yellow.
 

Attachments

  • MoveNumbers2.xlsm
    16.6 KB · Views: 5
Hi Luke M

Its work Perfect but can u please tell me we can use 2 colors in this For Cut cells use Red & Where to paste that cell yellow
 
This section, sans comment lines, is where the colors are set
Code:
           With Cells(i, "A")
'This is the cell you are pasting to
                .Interior.ColorIndex = 6
                .Value = fCell.Value
            End With
            With fCell
'This is the cell you are cutting from
                .ClearContents
                .Interior.ColorIndex = 6
            End With
If you want different colors, you can change the color index number. I believe red is color index 3, so new code would be
Code:
            With Cells(i, "A")
                .Interior.ColorIndex = 6
                .Value = fCell.Value
            End With
            With fCell
                .ClearContents
                .Interior.ColorIndex = 3
            End With
 
Back
Top