Microsoft Office Forums

Go Back   Microsoft Office Forums > >

Reply
 
Thread Tools Display Modes
  #1  
Old 02-24-2015, 09:20 AM
dapeamel dapeamel is offline Copying specific cells to a new sheets also give sheetname Windows 8 Copying specific cells to a new sheets also give sheetname Office 2010 64bit
Novice
Copying specific cells to a new sheets also give sheetname
 
Join Date: Feb 2015
Location: sweden
Posts: 10
dapeamel is on a distinguished road
Smile Copying specific cells to a new sheets also give sheetname

Hi guys,



I have a function that loops through all the sheets in a excel document
I return the name of the sheets,

See code below:

Sub WorksheetLoop()

Dim WS_Count As Integer
Dim I As Integer


WS_Count = ActiveWorkbook.Worksheets.Count


' Begin the loop.
For I = 1 To WS_Count


' Insert your code here.
'MsgBox ActiveWorkbook.Worksheets(I).Name

Next



Now I need a function

my exceldocument contain over 30 different columns "CAT", "DOG", "BIRD" ,"HORSE" etc.


I need a script that check after a certain cell-color (Blue, RGB 0,112,192)


when it finds the first blue cell,

the script copying the blue cell + the first word in the same column, the word is always on row 1, also copying the word in column B in the same row to the same place but in a new sheet,
the script also copying cell from the same column it finds the blue cell on, the first row cell and give it as name on the sheet it creats


so example see pictures



this is a orginal excel document




example result 1


example result 2



Could someone help me out ?

Thank you in advance
Reply With Quote
Reply

Tags
copy column, copy range

Thread Tools
Display Modes


Similar Threads
Thread Thread Starter Forum Replies Last Post
Copying text range of cells to different cells adds an extra line jpb103 Word VBA 2 07-23-2014 12:22 PM
Copying a formula that uses pivottable cells Paul46 Excel 0 02-08-2014 07:04 AM
Copying specific cells to a new sheets also give sheetname Copying cells isminoh Excel 5 04-18-2012 11:49 AM
Copying sheets DavidSNPCPA Excel 2 01-19-2012 03:54 AM
Copying specific cells to a new sheets also give sheetname Repeated Cells in different sheets mhdagtas Excel 2 04-27-2011 12:02 AM


All times are GMT -7. The time now is 02:59 PM.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2020, vBulletin Solutions Inc.
Search Engine Optimisation provided by DragonByte SEO (Lite) - vBulletin Mods & Addons Copyright © 2020 DragonByte Technologies Ltd.
MSOfficeForums.com is not affiliated with Microsoft