vba

[Chris Motherwell via AccessMonster.com]

Is there a way to use a defined variable as part of a sub procedure name? I have sub procedures (that are called from another sub procedure) whose name is text string and a number which may be different each pass. I want to concatenate the string and the variable to generate the sub procedure name.

Chris

 

[Brendan Reynolds]

If you implement the procedures as methods of a class, you can use
CallByName ...

'Class1
Option Compare Database
Option Explicit

Public Sub Test01()
MsgBox "This is Test01"
End Sub

Public Sub Test02()
MsgBox "This is Test02"
End Sub

'Standard module
Public Function Test03(ByVal lngFuncNum As Long)
Dim obj As New Class1
CallByName obj, "Test" & Format$(lngFuncNum, "00"), VbMethod
End Function

--
Brendan Reynolds (MVP)
http://brenreyn.blogspot.com

The spammers and script-kiddies have succeeded in making it impossible for
me to use a real e-mail address in public newsgroups. E-mail replies to
this post will be deleted without being read. Any e-mail claiming to be
from brenreyn at indigo dot ie that is not digitally signed by me with a
GlobalSign digital certificate is a forgery and should be deleted without
being read. Follow-up questions should in general be posted to the
newsgroup, but if you have a good reason to send me e-mail, you'll find
a useable e-mail address at the URL above.

 

[Chris Motherwell via AccessMonster.com]

Thanks Brendon, I'll try it out.