Pool Christian Calderón Pinillos

Pool Christian Calderón Pinillos

 Perú @poolchristiancalderonpinillos desde - visto
Preguntar

Actividad pública reciente

Ha valorado "Buena" la respuesta

Error(se reinicia el excel) al ingresar un nuevo item mediante un formulario a una tabla de una hoja de excel

respondió: [Hola Los datos en las Tablas no se insertan del mismo modo que en un rango "común" ya que ocasionan el dilema que mencionas (es un "bug" de Excel). Mira esta conversación: Cargar datos en una tabla contenida en una hoja de excel mediante un botón.
Ha valorado "Buena" la respuesta

Filtrar números que comiencen por o contengan en vba excel

respondió: Intenta con un bucle for o con sql acá unos ejemplos por si te interesa https://youtu.be/8ofRt-SDpfc https://youtu.be/SiYG7sBH7zo https://youtu.be/wOudnnm8g-g https://youtu.be/WfIvoBTSmpE https://youtu.be/8ekVymydhrw https://youtu.be/1KgMgwp6TII Aca...
Ha valorado "Buena" la respuesta

Dónde modificar código Array en vba Excel para hacer que tome datos desde una fila específica para un Listbox

respondió: Si quieres cargar desde A2 hasta N y hasta la última fila con datos, puede ser: Private Sub UserForm_Initialize() UserForm1.Lst_database.List = Hoja1.Range("A2:N" & Hoja1.Range("A" & Rows.Count).End(3).Row).Value End Sub
Ha empezado a seguir a
Voto positivo a la respuesta

Macro para envíar correos masivos con adjuntos diferentes

respondió: Te anexo mi aplicación para enviar varios correos, a diferentes destinatarios, con diferentes archivos, con diferentes asuntos, con diferentes cuerpos de mensaje. '***Macro Para enviar correos Sub correo() 'Por.Dante Amor col = Range("H1").Column For...
Ha empezado a seguir a
Ha valorado "Excelente" la respuesta

¿Cómo utilizar la variable for y para modificar diferentes controles Textbox?

respondió: Considera el siguiente ejemplo: Dim i As Long For i = 1 To 15 Controls("TextBox" & i).Value = Empty Next
Voto positivo a la respuesta

No permitir campos vacíos en un formulario userform.

respondió: ¿La fecha es un textbox? Intenta lo siguiente: Private Sub CommandButton2_Click() ' 'VALIDACIONES If Fecha.Value = "" Then MsgBox "Falta la fecha" Fecha.SetFocus Exit Sub End If If CodRodamientos.Value = "" Then MsgBox "Falta el CodRodamiento"...
Ha empezado a seguir el tema
Ha empezado a seguir el tema
Ha empezado a seguir el tema
Ha empezado a seguir el tema