Guillermo Villanueva

Guillermo Villanueva

 Argentina @guillermovillanueva desde - visto
Preguntar

Actividad pública reciente

Ha valorado "Buena" la respuesta

Funcion if con msgbox si no coincide una busqueda

respondió: Debes usar un manejador de excepciones en el caso de vba para excel, usaremos "On Error GoTo". Funciona de la siguiente manera: Colocamos la sentencia ante de empezar a hacer las búsquedas, indicando que en caso de error se dirija hacia una etiqueta...
Ha valorado "Excelente" la respuesta

No puedo ejecutar userform en libro compartido

respondió: Esto es lo normal en libros compartidos. Podrás leer acercs de las limitaciones desde la Ayuda de Excel bajo el tema: libros compartidos. Sdos. Elsa
Ha empezado a seguir a
Ha valorado "Excelente" la respuesta

Programar un formulario con optionbutton

respondió: Agregá la línea que dejo con negritas: Private Sub CommandButton1_Click() Range("A5000").Select ActiveCell.End(xlUp).Select If OptionButton1.Value = True Then resulta = "SI" Else: resulta = "NO" ActiveCell.Offset(1, 0).Value = resulta End Sub
Ha empezado a seguir el tema
Ha valorado "Excelente" la respuesta

Configuración de botón de opciones en un userform

respondió: H o l a: Como te comenté debes hacer una pregunta nueva por cada petición. Voy a tomar esta pregunta para actualizar la macro. Puedes poner la macro y el texto que quieres poner.
Ha valorado "Excelente" la respuesta

Macro enviar correo outlook y pdf adjunto y un cierto texto

respondió: H o l a: Te anexo la macro con los cambios para enviar el pdf por correo. Cambia en la macro B2 por la celda que contiene el correo del destinatario; cambia B3 por la celda que contiene el nombre. Sub carga_de_datos() Sheets("Hoja4").Select...
Ha valorado "Excelente" la respuesta

Macro seleccionar celda de solo una columna con respecto al valor de una celda

respondió: H o l a: Te anexo la macro Sub SeleccionarCelda() 'Por.Dante Amor Set b = Range("A2:A100").Find(Range("F1"), lookat:=xlWhole) If Not b Is Nothing Then b.Select Else MsgBox "El valor no existe" End If End Sub Sigue las Instrucciones para un botón y...