Reducir lines de código

Dim ctrl As Control
For Each ctrl In Sheets(1).Controls
If TypeOf ctrl Is TextBox Then
ctrl.Text = vbNullString
End If
Next

prueba con este código, esta sin probar, tal vez se pueda sustituir ctrl.text = vbnullstring por la instrucción

Ctrl. Clear

Hola Eduardo.

Pregunto si el código recomendado, SOLO actúa sobre TextBox

Si, la instrucción

if typeof ctrl is textbox then

Cumple esa funcion

Aunque haciendo el cambio como me sugietres, sigue dando error en la linea For Each ctrl In Sheets(1).Controls

Ese error viene dado porque no son controles agregados a un userform, sino integrados directamente en la hoja.

Utiliza este código, que ya lo he probado:

Dim shp As Shape
For Each shp In Hoja1.Shapes
If shp.Type = 12 And InStr(shp.Name, "TextBox") <> 0 Then
With Hoja1.OLEObjects(shp.Name).Object
.Text = vbNullString
End With
End If

Lo mencione en el libro:

Abrí el libro, le desactive las lineas TODAS referentes a TextBox.Text = "" quedo solo el restante código.

Se entiende que no tiene código para limpiar los TextBox

Fuy al tablero (hoja1) y seleccione uno para Eliminar, le di a Limpiar y limpio todo dejando todos con los títulos de la hoja2 cada cual con su respectivo titulo en los TextBox y Combo Box, ¿porque será? si no existe código para limpiar los TextBox?.

Cerré el libro y volví a abrirlo SIN CÓDIGO y lo mismo sucede

Entonces le agregue tu código, y hizo lo mismo coloca los títulos de la hoja2 no quedan en blanco.

Repito: será que mi excel esta fallando?

Me falto decirte algo; no me dá error con este codigo