Visual Basic - Limpiar varios Textbox

Hola foro,

quisiera hacer una funcion o procedimiento en el cual tomar como parametro un objeto que no se si seria de tipo object o controls y asi invocarlo desde cualquier form NO importando la cantidad de textbox que hayan en el form, o sea, que pueden ser 2 o 30.
Espero haber sido claro.

desde ya Muchas gracias.

Alejandro

Mediante la propiedad "controls.count" puedes obtener el numero de controles que hay en un formulario.

Ejemp. N_controles = Form1.controls.count

si en los formularios creas los controles de acuerdo a un patron

Txtxxxxxx, para cuadros de texto
Lblxxxx, para etiquetas .......
Grdxxxx , para rejillas de datos

Puedes obtener cuantos controles hay , de que tipo, poner texto, etc ....

for i = 1 to n_controles
nombre_control = form1.controls(i-1).name
if mid(nombre_control,1,3) = "Txt" then
form1.controls(i-1).text = ""
end if
next

En excel 2010, en hoja1 tengo un tablero (no formulario) el cual tengo uno de los butones para lipiar, el codigo que tengo es este


y tengo este tambien pero me da error en la linea 'For Each Clear In Sheets(1).Controls


Algo se puede hacer? para reduci lineas a su maxima expresion?, es decir, no tener tantas lineas en el codigo