Usar cuadros de diálogo de VBA en Excel

Utilice el cuadro de entrada de función incorporada de VBA para ingresar texto y establecer "Clase" como una variable. Utilice msgbox para devolver el valor resultante en la celda M2.

DIM bj AS String

bj=inputbox("Ingrese su texto", "Ingrese")

Hojas("ETINFO(Formal)") .Seleccionar

ActiveWindow.Field:=7, Criterio1:="Nombre"

Celdas.Seleccionar

Selección.Copiar

Hojas ("Copiar").Select

Range("A1").ActiveSheet.Paste

Range("M2").Select

msgbox range(" m2").value

Application.CutCopyMode = False

ActiveCell.FormulaR1C1 = "=COUNTIF(C[-10],""HS4B4")"

Si su nombre también necesita ser una variable, agregue otra variable y asígnele un valor a través del cuadro de entrada

El cuadro de texto es solo un cuadro de texto, no un cuadro de diálogo

.