kgb_elantro

kgb_elantro

 13,3K puntos  Chile @kgb_elantro desde - visto
Preguntar

Actividad pública reciente

Ha respondido en

PC tarda en cerrar luego de usar Excel.

Yo he instalado en muchos PC archivos de excel llenos de macro, y macros bastante poderosas con extensas bases de datos, si bien se demoran un poco en abrir y guardar, jamas me ha pasado que por culpa de aquello afecte el funcionamiento de mi PC,...
Ha respondido en

Ayuda fórmula cancelar o borrar

No hay fórmula que te haga todo eso. Lo que necesitas es una macro que al detectar un cambio en la columna I y esa celda es igual ha Cancelado valla ala columna Numero de Plumone, te rescate el código, luego valla a la tabla de datos, busque ese...
Ha respondido en

Convertir macro en programa

Puedes hacerlo de forma independiente sin necesidad de generarlo en visual basic. Solo grabas la macro en "Libro de Macros Personales", le asignas un atajo (Ctr+mayusc+D), y esa macro se ejecutara en cualquier libro de excel. Si deseas hacerlo en...
Ha respondido en

Copiar celdas de una columna a otra con condición

Range("A2").Select Do While ActiveCell = "" ActiveCell.Offset(0, 1).Select If ActiveCell.Value <> "" Then Abono = ActiveCell.Value ActiveCell.Offset(0, -1).Select ActiveCell.Value = Abono ActiveCell.Offset(0, 1).Select ActiveCell.Value = ""...
Ha respondido en

¿Una macro para abrir IE en una dirección especifica?

Dentro de tu botón pega esta macro Shell ("explorer http://www.google.cl"), vbNormalNoFocus Si la respuesta te sirvió, recuerda valorarla y cerrarla.
Ha respondido en

Contar blancos VB

¿El rango a seleccionar siempre es el mismo?
Ha respondido en

Macro para cambiar el valor de una celda

Sub Imagen_Haga_clic_en() ActiveSheet.Range("D2").Select While ActiveCell <> "" If Selection.Value < 0 Then Negativo = -1 Negativo = ActiveCell.Value * Negativo ActiveCell.Value = Negativo End If Selection.Offset(1, 0).Select Wend End Sub Esa esa...
Ha respondido en

Macro botón examinar excel

Inserta un CommonDialog en algún formulario ya existente o en uno nuevo. Si no tienes el control CommonDialog, agregalo en tu cuadro de herramientas. (Botón derecho sobre cuadro de herramientas y seleccionas el "Microsoft Common Dialog control ...")....
Ha respondido en

¿Se puede cambiar el valor por defecto de un msgbox?

If MsgBox("Este Producto no esta ingresado a su stock ¿Desea ingresarlo Ahora?", 292, "Codigo no existe") = 6 Then en esa linea remplaza el 292 por este codigo vbQuestion + vbYesNo + vbDefaultButton1
Ha respondido en

¿Se puede cambiar el valor por defecto de un msgbox?

En el código de msgbox remplaza 292 por este código vbQuestion + vbYesNo + vbDefaultButton1
Ha respondido en

Códigos repetidos

Primera Opción: Usa La herramientas de "Formato Condicional" para que te detecte Valores Duplicados. Segunda Opción: La columna A, ordenala de Menor a mayor o vice versa, da lo mismo. Suponiendo que tu listado de codigos comienza en la celda A1, pega...
Ha respondido en

Fórmulas condicional mayor y menor que

Ejemplo: Si quiero saber las notas menores a 3 en el rango de F4 a F85. Donde el criterio se encuentra en la H16. Suponiendo que en celda H16 Dígito el 3 sin comillas ni nada. =contar.si(F$4:F$85;"<"&H16) Si deseas usar mas de un criterio debes de...
Ha respondido en

Duplicar hojas

Asigna esta macro a un botón y te duplicara según el numero de veces que le indiques en la cela A1 de la hoja1. Veces = Hoja1.Range("A1") cont = 0 While Veces <> cont Sheets("Hoja1").Select Sheets("Hoja1").Copy After:=Sheets(3) cont = cont + 1 Wend...
Ha respondido en

Fotos en excel

No puedes hacer eso a través de fórmulas, para eso debes hacer una macro. Te aconsejo que hagas ese fichero en acceses, es mucho más fácil y cómodo.
Ha respondido en

Avisar si excel no encuentra algún dato.

Sub Boton_Resta_Haga_clic_en() paso = 0 Range("B1").Select If Range("b1").Value = "" Then MsgBox ("Debe digitar un codigo") Else codigo = Range("B1").Value Range("A10").Select While ActiveCell.Value <> "STOCK SATURADO" If ActiveCell.Value = codigo...