|
|
#1
09-14-2016, 08:29 AM
|
|||
|
|||
Extracting colored cells from one spreadsheet into another
I have a spreadsheet color coded with red and green cells (in multiple columns). I need ANOTHER spreadsheet to extract and display just the red cells from the original and place them in a single column. How do I do that?
|
|
#2
09-14-2016, 08:49 AM
|
||||
|
||||
|
Moved to programming section
__________________
Did you know you can thank someone who helped you? Click on the tiny scale in the right upper hand corner of your helper's post
|
|
#3
09-14-2016, 03:52 PM
|
|||
|
|||
|
Are the cells colored manually or by conditional formatting ?
What order is required on the new sheet, by row or by column ? Last edited by NoSparks; 09-14-2016 at 03:58 PM. Reason: added second question
|
|
#5
09-14-2016, 04:42 PM
|
|||
|
|||
|
You responded too fast.
 I edited my original post to add another question. Should also have asked for the definition of "ANOTHER" spreadsheet and why it was capitalized.
|
|
#6
09-15-2016, 07:13 AM
|
|||
|
|||
|
LOL - I just really need an answer!
"Another spreadsheet" is only significant because it's located in a different directory from the original, not just a tab in the same workbook. The order isn't important, they just all need to be consolidated into 1 column. The original has multiple columns (about 243?) of about 45 rows or less. In the final spreadsheet I just need one column with however many lines it takes to list all of the red cells. Last edited by Kari Frey; 09-15-2016 at 07:16 AM. Reason: expanded answer
|
|
#7
09-15-2016, 08:41 AM
|
|||
|
|||
|
Maybe something like this... you'll need to deal with the things you're not telling us.
Code:
Sub CopyRedValues()
Dim cel As Range
Dim writerow As Long
writerow = 2
For Each cel In Sheets("source sheet name").UsedRange
If cel.Interior.Color = vbRed Then
cel.Copy
destinationworkbook.Sheets("ANOTHER").Range("A" & writerow).PasteSpecial xlValues
writerow = writerow + 1
End If
Next cel
Application.ScreenUpdating = True
End Sub
|
|
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
 Can I autofill cells using percentages from another spreadsheet?
|
Baldeagle | Excel Programming | 25 | 03-24-2016 03:05 AM |
|
autofill cells using percentages from another spreadsheet
|
Baldeagle | Excel Programming | 1 | 01-15-2015 01:28 PM |
| predefine thick border colored lines for highlighted cells | dylansmith | Excel | 0 | 09-05-2014 07:49 AM |
|
Extracting data from ppt graphs without linked spreadsheet
|
Abol | PowerPoint | 2 | 06-27-2013 07:42 AM |
Windows 7 64bit 
Office 2010 64bit
Linear Mode
