cmpgeek
08-03-2004, 07:05 AM
hey yall,
i found a VBA code in the KB last week that was the answer to my prayers...
http://www.vbaexpress.com/kb/getarticle.php?kb_id=75
(:ipray: thanks Steiner)
I had just created a spreadsheet with about 60 sheets and 6 columns per sheet of nothing but cells to enter times. Steiner's code has made it so that all i have to enter is 2345 and it formats it to 23:45. i know how trivial that may sound, but when you are entering 4 or 5 times on each of those 60+ sheets, it can save you a lot of time if you are accustomed to using the number pad and you have to stop each time.
Anyway - i digress - my new problem is that the other two files i want to use this code on are not as simple (in as far as the basic code fixing it)
My monthly census report has rows that are nothing but times, and my monthly volume report has columns that are strictly for times. However - neither the rows in the census report, nor the columns in the Volume report are adjacent to all the others.
The code in Steiners KB submission uses this line:
If Intersect(Target, Range("H:L")) Is Nothing Then Exit Sub
i figured out how to get it to at just one column, but i can not figure out how to get it to look at several columns on the same sheet that are not adjacent to each other. and the same is true for having it look at non-adjacent rows...
Does anyone have any suggestions?
thanks in advance
i found a VBA code in the KB last week that was the answer to my prayers...
http://www.vbaexpress.com/kb/getarticle.php?kb_id=75
(:ipray: thanks Steiner)
I had just created a spreadsheet with about 60 sheets and 6 columns per sheet of nothing but cells to enter times. Steiner's code has made it so that all i have to enter is 2345 and it formats it to 23:45. i know how trivial that may sound, but when you are entering 4 or 5 times on each of those 60+ sheets, it can save you a lot of time if you are accustomed to using the number pad and you have to stop each time.
Anyway - i digress - my new problem is that the other two files i want to use this code on are not as simple (in as far as the basic code fixing it)
My monthly census report has rows that are nothing but times, and my monthly volume report has columns that are strictly for times. However - neither the rows in the census report, nor the columns in the Volume report are adjacent to all the others.
The code in Steiners KB submission uses this line:
If Intersect(Target, Range("H:L")) Is Nothing Then Exit Sub
i figured out how to get it to at just one column, but i can not figure out how to get it to look at several columns on the same sheet that are not adjacent to each other. and the same is true for having it look at non-adjacent rows...
Does anyone have any suggestions?
thanks in advance