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 1 temas más a

¿Cómo asignar un valor numérico a una sola celda dependiendo de textos diferentes en 2 celdas?

Tienes que poner la condición en pares, la fórmula quedaría así: =SI(Y(A2="corte";B2="hoja G");120;SI(Y(A2="soldadura";B2="hoja G");80;SI(Y(A2="corte";B2="marco G");75;"No existe"))) En C2 pon la fórmula Avísame cualquier duda . .
Respuesta en y en 2 temas más a

¿Como pasar todos los items de un ListBox a una celda especifica? VB

Te anexo un ejemplo, para pasar los datos del un listbox a la hoja. Voy a suponer algunas cosas. - En el listbox tienes 4 columnas : cantidad, descripción, precio e importe - Vas a pasar la cantidad a la columna B, descripción en C, precio en D e...
Respuesta en y en 2 temas más a

Extraer hojas excel con macro

Revisa la macro de esta respuesta: Macro para desplegar lista y seleccionar hojas para exportar a otro libro de excel En esta respuesta explico cómo crear el form: MACRO de excel para imprimir varias hojas de un mismo libro Sal u dos. No olvides...
Respuesta en a

Como eliminar filas con tres condiciones en distintas columnas

Te anexo la macro Sub Eliminar_Fila() 'Por Dante Amor Application.ScreenUpdating = False For i = Range("L" & Rows.Count).End(xlUp).Row To 1 Step -1 If (Cells(i, "L") = "INSUMOS" Or Cells(i, "L") = "SERVICIOS") And _ Cells(i, "G") = 0 Then...
Respuesta en y en 3 temas más a

Macro que compile archivos en hojas distintas de un archivo base

Te anexo la macro, selecciona la carpeta que contiene los archivos y la macro copiará la primer hoja de cada archivo. Si la hoja ya existe en el archivo "compilador", le agregará un "-1" para hacer la diferente y poder renombrarla. Sub...
Respuesta en y en 2 temas más a

¿Puede crearse un campo sugerencias en excel?

Puede hacerse con un combobox de Control Active X Revisa la siguiente respuesta: Como autocompletar Combobox en vba Avísame cualquier duda y lo adapto a tu hoja.
Respuesta en y en 1 temas más a

Una Macro que funcionaba en 2010, ahora en el 2013 es re lento.

Prueba con la siguiente: Sub Quitar_Apostrofe() Set rango = Range("D12:D18") With rango.Offset(, 1) .FormulaR1C1 = "=RC[-1]" .Value = .Value End With End Sub Lo que hace la macro es quitar el apostrofe Cambia en la macro "D12:D18" por el rango de...
Respuesta en y en 2 temas más a

Cómo arreglar código VBA de Excel - Error 1004.No se puede obtener la propiedad LookUp de la Clase WorksheetFunction

El problema de la función Application. WorksheetFunction. VLookup, es que si no encuentra el dato en el hoja, te va regresar error. Puede ser que el dato exista en el combo, pero de igual forma no necesariamente exista en la hoja y entonces enviará...
Respuesta en y en 2 temas más a

Necesito una macro para Buscar un valor y al hallarlo pegue datos en las tres columnas siguientes

Te anexo el código para el botón de tu form, para ingresar los datos: Private Sub CommandButton1_Click() 'Por Dante Amor 'Ingresar datos pedido = TextBox1.Value If pedido = "" Then MsgBox "Debes capturar un número de pedido" TextBox1.SetFocus Exit...
Respuesta en y en 1 temas más a

Código para filtrar fecha en TD

Quedaría así: Sub Remp() ' ' Remp Macro ' Este boton remplazara los sku ' mirango = Range("f1").Select ' Sheets("Base").Select Range("H1").Select Columns("H:H").Select Selection.Replace What:="11524", Replacement:="11523", LookAt:=xlWhole, _...