José Saúl Méndez Alonso

Para crear un inventario en Excel considera lo siguiente 1.-Debes identificar los productos con algún código. 2.-Debes considerar si el inventario lo haces por costos por unidades o por ambos Sí son ambos debes crear una hoja nueva donde tengas en un...

Si sabes de MACROS de puedo indicar como usar un código para resolver tu duda.

Una MACRO te puede solucionar eso De hecho ya antes me preguntaron por algo similar te dejo el código de ejemplo a ver si te sirve 1.- Crea un Archivo donde almacenes el último folio y mediante una macro que se ejecute cuando abras tu factura lo vas...

Sólo necesito saber cual celda de la hoja 2 cambia y afecta a la celda a1 de la hoja 1 y lo mismo para la ceda a4 de la hoja 1 de todos modos te dejo otro código con los ajustes necesarios. Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal...

Te dejo este código a ver si te sirve Sub Macro1() Dim sRango As Range Dim sCeldaIni As String Dim nFilaIni As Long Dim nFilaFin As Long Dim nColIni As Long Dim nColFin As Long Dim nFila As Long Dim nCol As Long Set sRango =...

Te dejo este código a ver si te sirve Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) MsgBox Target.Address(, , xlR1C1) End Sub

Te dejo este código Sub Macro1() Dim sCelda As String Dim nFila As Long Dim nCuantasFilas As Long Range("D1").Select Selection.End(xlDown).Select nCuantasFilas = Selection.Row For nFila = 1 To nCuantasFilas sCelda = "D" & nFila...

Ya tenias la solución Private Sub CommandButton1_Click() Dim ultimafila As Long Dim ultimacolumna As Long Sheets("hoja2").Select ultimafila = Range("A65536").End(xlUp).Row ultimafila = ultimafila + 1 Cells(ultimafila, 1).Select ActiveCell.Value =...

Te dejo el siguiente código a ver si te sirve Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) If UCase(Sh.Name) = "HOJA1" Then If Target.Address = "$A$1" Then If Range(Target).Value = 0 Then Range("A1:C3").EntireRow.Hidden...

Te dejo este código a ver si te sirve ActiveWorkbook.BreakLink Name:= "Nombre del Archivo Vinculado", Type:=xlExcelLinks