Macro Lessons??

Reply #8

lottaloot — Mon, 30 Jan 2006 21:53:18 GMT

Paurths, I love your code. Thanks for posting it. Excel is a pwerful thing. Powerplayer, good luck

Reply #7

winsumloosesum — Mon, 30 Jan 2006 21:20:04 GMT

Powerplayer,Still need the Pick 4 listing??wsls

Reply #6

powerplayer — Sat, 28 Jan 2006 14:52:17 GMT

Awesome TODD!!! The drag trick I learn from you and use it all the time. Thank youI will taket the advise of useing a formula instead. This was actually only to make the chart. So the macro would have only been used and save if needed again. Once it's done creating this chart of all the combinations I'm going to use my other formula that I have with the pick 3 and apply it to this....Thank you again........work will be fun tonight..PP

Reply #5

Todd — Sat, 28 Jan 2006 14:46:51 GMT

I wouldn't do this kind of thing with a macro. It's much easier (and more re-usable) to do it using formulas. If you use formulas, then you can quickly apply the formulas to a large range of cells using copy and paste. Many people don't realize how powerful Excel formulas can be. You can use any VBA functions in your formula, including some pretty powerful string manipulation functions.Why not create cells b1, c1, d1, and e1 as each of the four digits? For example, cell b1 would contain the... [ More ]

Reply #4

powerplayer — Sat, 28 Jan 2006 14:34:00 GMT

Paurths,I got another question if you can answer. can you explain what the different code means so I can undstand this more.Trying to learn...Like what does iw and things like this....Dim s1 As StringDim s2 As StringDim s3 As StringDim s4 As Stringthe s1 what is this line doing..sorry for the question but, if I understand the code then I will be able to write it.ThanksPP

Reply #3

powerplayer — Sat, 28 Jan 2006 14:26:38 GMT

WOW thank you Paurths..this is great!!Something to do at work tonight...

Reply #2

paurths — Sat, 28 Jan 2006 12:34:53 GMT

Oops, just reread your post.You want it to skip a column each time?Then change this line: iWCol = iWCol + 1to : iWCol = iWCol + 2Then you'll need 20 000 columns...

Reply #1

paurths — Sat, 28 Jan 2006 12:26:54 GMT

I don't think there are 10000 columns available, Powerplayer...It will loop until it finds an empty cell in column A.(i have this in a proceducre somewhere where an array is used to create the 24-ways, but i can't seem to locate it lol) Private sub sbMake24Way() Dim iRows As IntegerDim iWCol As IntegerDim s1 As StringDim s2 As StringDim s3 As StringDim s4 As StringDim blnEnd As Boolean iWCol = 2 iRows = 1 Do Until blnEnd 'Dummy variable, blnEnd (not needed in this setup ofcourse.... [ More ]

Macro Lessons??

powerplayer — Sat, 28 Jan 2006 11:04:47 GMT

Hello all,I know we have had a lot of people ask excel and VB questions.I am trying to learn macro's to make things easier with a automated task.I'm a little confused on how to go about doing this.Here is what I have:In Cell A1 going down I have the folling:0987 0986 0985 0984 0983 0982 0981 0976 0975 0974 0973 0972 0971 0965 0964 0963 0962 0961 0954 0953 0952 0951 0943 0942 0941 0932 0931 0921 0876 0875 0874 0873 0872 0871 0865 0864 0863 0862 0861 0854 0853 0852 0851 0843 0842 0841 0832 0831 08... [ More ]