ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Data Fill in VB? (https://www.excelbanter.com/excel-programming/404287-data-fill-vbulletin.html)

Carrie_Loos via OfficeKB.com

Data Fill in VB?
 
I have a worksheet with names in the first row and I used a look up formula
to gather data from another sheet that signifies dates (this ties in with the
rest of my workbook and how it behaves so has to remain this way) so
basically I have columns with 1's and 2's in them otherwise blank spaces.

1=begin date and 2=end date. I want to find the 1's in each column and fill
in with a 1 in between the 1 and 2 as well as changing the 2 to a one. What I
need is a string of 1's.

I have looked at a couple of data fill examples and it appears to be the way
to go but I need help with this.

Thanks in advance
Carrie

--
Message posted via OfficeKB.com
http://www.officekb.com/Uwe/Forums.a...mming/200801/1


Dave D-C[_3_]

Data Fill in VB?
 
A sheet formula solution:
say col A has
Adam
b
b
1
b
b
2
b
b
etc .
where b's are blanks. Then put the following in B2
=IF(OR(MAX(A$2:A2)=1,A2=2),1,"")
and copy down and this will give you your 1's which
you could copy and paste special back to col A.

A VBA macro should be easy. Do you have a start? Dave D-C

"Carrie_Loos via OfficeKB.com" <u34134@uwe wrote:
I have a worksheet with names in the first row and I used a look up formula
to gather data from another sheet that signifies dates (this ties in with the
rest of my workbook and how it behaves so has to remain this way) so
basically I have columns with 1's and 2's in them otherwise blank spaces.

1=begin date and 2=end date. I want to find the 1's in each column and fill
in with a 1 in between the 1 and 2 as well as changing the 2 to a one. What I
need is a string of 1's.

I have looked at a couple of data fill examples and it appears to be the way
to go but I need help with this.

Thanks in advance
Carrie



Carrie_Loos via OfficeKB.com

Data Fill in VB?
 
Great -

I can wirte this in a flash. I have never used the approach of using a
formula to think about and then write the macro......Love to learn new
approaches. Thx


Dave D-C wrote:
A sheet formula solution:
say col A has
Adam
b
b
1
b
b
2
b
b
etc .
where b's are blanks. Then put the following in B2
=IF(OR(MAX(A$2:A2)=1,A2=2),1,"")
and copy down and this will give you your 1's which
you could copy and paste special back to col A.

A VBA macro should be easy. Do you have a start? Dave D-C

I have a worksheet with names in the first row and I used a look up formula
to gather data from another sheet that signifies dates (this ties in with the

[quoted text clipped - 10 lines]
Thanks in advance
Carrie


--
Message posted via OfficeKB.com
http://www.officekb.com/Uwe/Forums.a...mming/200801/1



All times are GMT +1. The time now is 01:16 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com