Dante Amor

Dante Amor

https://www.youtube.com/@CursosDeExcelyMacros
 5.752K puntos  Ciudad de México, México @aprendemos desde - visto
Preguntar

Respuestas en Visual Basic

Respuesta en y en 2 temas más a

Filtro en Combobox dentro de UserForm en excel

¿Pero en la columna A tienes celdas vacías? Te recomiendo que siempre pongas la categoría a la que pertenece cada subcategroría, de esta forma: Categoría 1 Subcategoria1 Categoría 1 Subcategoria2 Categoría 1 Subcategoria3 Categoría 2 Subcategoria1...
Respuesta en y en 1 temas más a

Generar documento en PDF y asignarle password

H o l a: Tienes que tener instalada alguna versión de PDF profesional para crear PDF, es decir, ese código de VBA solamente genera una impresión del archivo como PDF, pero necesitas tener instalado algún software con la capacidad de crear PDF, puede...
Respuesta en y en 2 temas más a

¿Cómo enviar un email automático desde EXCEL usando vba al cumplirse cierta condición?

H o l a: ¿El correo lo quieres enviar por outlook?
Respuesta en y en 2 temas más a

Ordenar columna numérica en listbox

H o l a: Voy a suponer lo siguiente. - Estás poniendo la información en la hoja "temp" de manera temporal y después la cargas en el listbox. - En la columna "D" tienes un importe. - En la columna 4 del listbox estás poniendo el importe - El ancho de...
Respuesta en y en 3 temas más a

¿Como puedo cargar datos de una hoja a un listbox2, pero seleccionando un registro del listbox1?

H o l a: Según la imagen, en el listbox1 los datos KEY están en la primer columna. Entonces pon lo siguiente en el evento ListBox1_Click Private Sub ListBox1_Click() 'Por.Dante Amor ListBox2.Clear wkey = ListBox1.List(ListBox1.ListIndex, 0) Set h =...
Respuesta en y en 1 temas más a

Textbox que suma los valores de celdas

Te anexo la macro del commandbutton actualizada para sumar en el textbox2 Private Sub CommandButton1_Click() 'Por.Dante Amor Set h = Sheets("Contratos") TextBox1 = "" existe = False For i = 1 To h.Range("B" & Rows.Count).End(xlUp).Row If h.Cells(i,...
Respuesta en y en 1 temas más a

Corregir errores en macros de excel

Si quieres que todo quede en mayúsculas, cambia esta línea: Calificaciones = resultado & " COMA " & resultado2 Por esta: Calificaciones = UCase(resultado) & " COMA " & UCase(resultado2) Si solamente quieres los decimales en mayúsculas, entonces por...
Respuesta en y en 1 temas más a

Textbox con 2 criterios de búsqueda

H o l a: Agrega un commandbutton a tu formulario, presiona doble click sobre el commandbutton y pon el siguiente código: Private Sub CommandButton1_Click() 'Por.Dante Amor Set h = Sheets("Contratos") TextBox1 = "" For i = 1 To h.Range("B" &...
Respuesta en y en 1 temas más a

Error de compilacion: No se ha definido Sub o Function (Private Sub UserForm_Initialize() Call Conexion End Sub)

H o l a: En estar instrucción, estás indicando que se ejecute la macro "conexion" Private Sub UserForm_Initialize() Call conexion End Sub La macro "conexion" la debes tener dentro del formulario en algún módulo. Revisa que el nombre de la macro sea...
Respuesta en y en 2 temas más a

Como puedo pasar una fila de item a otra hoja

Te anexo la macro actualizada Sub Macro2() ' Dim strTitulo As String Dim Continuar As String Dim hoja As String Dim TransRowRng As Range Dim NewRow As Integer ' strTitulo = "Transferencia Entre Bodegas" hoja = Sheets("hoja1").Range("D1") If hoja = ""...