passing column character as subroutine parameter

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

Anand - 23 May 2008 22:58 GMT

I want to pass a column character as parameter to subroutine. What
should I define it as? Also how can I use that inside subroutine?

For example, the API the subroutine should look like is as below:

formatColumn("C") - Should format column C as per defined in the
subroutine. I'm also not clear how I can use this "C" inside
subroutine to identify which column it is. I'm just requested to have
function such as this.

Any suggestions appreciated.

thanks,
Anand.

Reply to this Message

Gary''s Student - 23 May 2008 23:38 GMT

Sub main()
Dim s As String
s = "D:D"
Call adjustcolumn(s)
End Sub

Sub adjustcolumn(icl As String)
Columns(icl).ColumnWidth = 30
End Sub

We could have made that that passed an integer, but I like your idea better.
Passing a string allows the subroutine to adjust moe than one column at a
time.

Signature

Gary''s Student - gsnu2007i

> I want to pass a column character as parameter to subroutine. What
> should I define it as? Also how can I use that inside subroutine?
[quoted text clipped - 10 lines]
> thanks,
> Anand.

Reply to this Message

Anand - 24 May 2008 00:03 GMT

On May 23, 3:38 pm, Gary''s Student
<GarysStud...@discussions.microsoft.com> wrote:

> Sub main()
> Dim s As String
[quoted text clipped - 26 lines]
> > thanks,
> > Anand.

Is there a way I can get the column number from the column passed as
string?

thanks,
Anand.

Reply to this Message

Anand - 24 May 2008 00:31 GMT

> On May 23, 3:38 pm, Gary''s Student
>
[quoted text clipped - 35 lines]
> thanks,
> Anand.

got it. Columns("AA").column.

thanks,
Anand.

Reply to this Message

Norman Jones - 23 May 2008 23:38 GMT

Hi Anand,

Try something like:

'==========>>
Public Sub Macro1()
Dim sCol As String

sCol = "C"
Call Macro2(sCol)

End Sub

'---------->>
Public Sub Macro2(sColumn As String)
Dim Rng As Range

Set Rng = ActiveSheet.Columns(sColumn)
MsgBox Rng.Address

End Sub
'<<==========

---
Regards.
Norman

>I want to pass a column character as parameter to subroutine. What
> should I define it as? Also how can I use that inside subroutine?
[quoted text clipped - 10 lines]
> thanks,
> Anand.

Reply to this Message