Alphabetic loop

[Bgeophysics]

I'm new to programing in excel and VB and was hoping someone could help we with this problem i'm facing. I'm trying to perform a fourier transform across over 6000 columns! I can do this for one column at a time using:

Sub fft()
'
' fft Macro
' fft
'
' Keyboard Shortcut: Ctrl+f
'
Application.Run "ATPVBAEN.XLAM!Fourier", Sheet2.Range("A$1:A$512"), Sheet3.Range("A$1:A$512"), False, False

End Sub

This works well for one column however i can't find a way of looping the column letter so that the operation repeats up to column IAV (ie. A B C ... IAV). Any help would be appreciated!

[MarvinP]

Hi Bgeophysics and welcome to the forum.

There are two ways to program around this:
1 Use Cells(Rows,Columns) instead of Range as the Rows is a number.
2 Use Offsets after your Range

See http://www.excel-vba.com/vba-code-2-6-cells-ranges.htm - this guy doesn't like cells, but I do.
Or http://www.anthony-vba.kefra.com/vba/vbabasic2.htm where s/he shows how they relate.

You will use the rows as a variable and increment it in the Cells(rows, columns) or Range(,).Offset(Rows,) commands.

[Bgeophysics]

MarvinP

I appreciate your response. I'm still having issues and i attribute this to my lack of programming knowledge. I cannot loop the FFT application across columns.

[StephenR]

To illustrate Marvin's first suggestion:

Please Login or Register  to view this content.

[Bgeophysics]

StephenR,
Thanks so much that worked great!