Dfgfg

Importantes comandos vistos en Centro Nacional de Capacitación para Macros

InputBox(cuadro de entrada)

'Cuadro de dialogo de entrada

'
'Nos permitirá ingresar un texto, numero o rango
''Sintaxis para función InputBox de VBA
'
'
'InputBox([prompt],[Title],[Default],{xpos],[ypos],[help file,context])
'
'Prompt : Es el texto mostrado en el cuadro de dialogo
'
'Title:(opcional)Texto de título para el cuadro de dialogo
'
'Default :Valor por defecto mostrado en el cuadro de dialogo
'
'Xpos,Ypos :La pantalla se ubicar según las coordenadas
'
'Helpfile ,context(opcional).el archivo de ayuda
'
'Type :Opcional. El tipo de dato devuelto como se ve en la siguiente tabla.
'
'código --> SIGNIFICADO
'------
'0 -----> Una fórmula
'1 -----> Un numero
'2-----> Una cadena(texto)
'4 -----> Un valor logico(True o False)
'8 -----> Una celda de referencia ,como un objeto de rango
'16 -----> Un error de valor,como #N/A

Ejemplo de cómoutilizar un imputbox

Sub nombres()

Dim i As String
Dim a As Integer

Range("A1:A20").Select 'selecccionamos rango de trabajo

For a = 0 To Selection.Cells.Count 'relizar repeticiones para cadauna de las celdas

i = (InputBox("Ingrese su nombre", "Nombre")) 'recuperamos la cadena del input box

ActiveCell.Offset(a, 0).Value = i 'bajamos por las celdas de la selección de 1 en 1

Nexta

End Sub

Propiedades para los botones de los msgbox o imput box

resp = MsgBox("¿Estas seguro que deseas dar de baja este registro?", vbOKCancel, "Confirmacion") 
If resp = 1 Then 
ejecutael codigo 
else 
otro codigo o validacion ----> 
end if 
esta es la manera mas facil que veo para poder ejecutar un codigo dependiendo el boton pulsado.. 
ahi tienes un ejemplo.... 
Valoresdevueltos 
Constante Valor Descripción 
VbOk 1 Aceptar 
VbCancel 2 Cancelar 
VbAbort 3 Anular 
VbRetry 4 Reintentar 
VbIgnore 5 Ignorar 
VbYes 6 Sí 
VbNo 7 No 
Nota: Si desea omitir algún...