Dante Amor
 1.459K puntos  Vive en Estado de México, México
@aprendemos desde - visto

Dante Amor

Feliz Año 2015 !!!
Preguntar

Preguntas y respuestas en Microsoft Excel

Como proteger el hombre de una hoja de Excel

Hola: Para que no cambien los nombre, protege el libro, le puedes poner una contraseña. saludos.Dante Amor
Respuesta en Microsoft Excel y en 1 temas más a

Fórmula para halar el último dato según la fecha actual

Hola: Puede completar los ejemplos de último enero y último febrero, si hoy estamos en Enero-2015, qué valor va en último enero = 41.00 ó 77.00? También pon el ejemplo de febrero y dime cómo es que manualmente lo encuentras. Saludos
Respuesta en Microsoft Excel y en 1 temas más a

Dato de ComboBox que se muestre y seleccione en un ListBox.

Hola: Te anexo la macro para cargar el listbox, pero depende de la forma en que hayas cargado el combobox Private Sub ComboBox1_Change() 'Por.Dante Amor f = ComboBox1.ListIndex + 2 ListBox1.ColumnCount = 3 ListBox1.Clear ListBox1.AddItem Cells(f,...
Respuesta en Macros Excel y en 3 temas más a

Error 13 no coinciden los tipos Vba Excel

Hola: La función VLookup, regresa error si no encuentra el dato. Te anexo la macro con la actualización, para verificar si es error. Private Sub BuscarCod_Click() Codi = InputBox("Ingrese código de muestra") Range("A1").Value = Codi Texto = "...
Respuesta en Microsoft Excel a

Copiar datos de una columna a varias columnas en otra hoja.

Hola: Te anexo la macro, estoy suponiendo que en al hoja1 en la fila 1 tienes títulos y entonces tus datos empiezan en la fila 2; si los datos no empiezan en la fila 2, entonces cambia en la macro for i = 2, por For i = 1. En la hoja2 te estoy...
Respuesta en Microsoft Excel y en 1 temas más a

Macro para exportar fecha con formato y condicional

Hola: Te anexo la macro. Sub exportar() 'Por.Dante Amor Set h1 = Sheets("Hoja1") Set h2 = Sheets("Hoja2") For i = 1 To h1.Range("H" & Rows.Count).End(xlUp).Row fec = DateSerial(Year(Date) - 1, Month(Date), Day(Date)) If h1.Cells(i, "H") < fec Then u...
Respuesta en Microsoft Excel a

Como colocar el titlulo o encabezado al listbox de excel?

Hola: Si la carga que haces al listbox es con la propiedad RowSource, entonces puedes utilizar la propiedad ColumnHeads Ejemplo de carga con encabezados: ListBox1.ColumnCount = 13 ListBox1.ColumnHeads = True ListBox1.RowSource = "A2:M" & Range("A" &...
Respuesta en Microsoft Excel y en 1 temas más a

Vincular 2 combos en excel sin que se actualice la pantalla

Hola: Te anexo otras formas de cargar los datos en el combobox, sin tener que activar la hoja. La primera es con el ciclo for, es más rápida que el do while, ya que con el while vas seleccionado celda cargas y luego seleccionas la siguiente celda....
Respuesta en Microsoft Excel y en 1 temas más a

Como poner bordes a celdas con macro

Hola: Te anexo la macro actualizada Private Sub TextBox1_Change() 'activamos la hoja base Sheets("datos").Activate 'nos posicionamos en la celda a1 Sheets("datos").Range("a1").Select 'limpiamos el listbox ListBox1.RowSource = Empty 'limpiamos la...
Respuesta en Microsoft Excel y en 1 temas más a

Bucle para cargar varias cadenas en cuerpo de coreeo

Hola: Te anexo la macro. Cambia "hoja4", "A" y 1 por la hoja, la columna y la fila en la que empiezan tus cadenas. Sub EnviarCorreo() 'Por.Dante Amor Set h1 = Sheets("Hoja4") col = "A" ini = 1 ' For i = ini To h1.Range(col & Rows.Count).End(xlUp).Row...