Juan Cosceri

Juan Cosceri

 9.225 puntos  Argentina @juancosceri desde - visto

Respuestas

Respuesta en y en 1 temas más a

Ingreso datos en una celda, pero se guarda en la misma celda de otra hoja. Después de generar una macro

Lo mejor para identificar este problema es correr el codigo con el debuger (F8) para identificar la sentencia que manda la info a la otra hoja. Es probable que cuando pongas el valor final en C9 lo tengas definido como: ActiveSheet.Range("C9").Value...
Respuesta en y en 4 temas más a

Vlookup de datos en un formulario VBA excel

La manera de hacer un Vlookup sobre variable es la siguiente set AccListSH = Sheets("HojaVLookup") ValorABuscar = Range("A1").value x = Application.VLookup(ValorABuscar, AccListSH.Range("A:B"), 2, False) En x almacenaras el resultado del Vlookup...
Respuesta en a

Sumar con macros, solo los datos activos de una filtración?

Te envío la Macro para sumar Subtotales. Sub SumVisibleCells() ' Dim SumVal As Long Set SelSH = Sheets("Hoja1") SumCol = 6 HeadeRow = 3 'Columna del encabezado de la tabla SelSHLR = SelSH.Cells(SelSH.Rows.Count, SumCol).End(xlUp).Row 'LastRow If...
Respuesta en y en 1 temas más a

Ocultar hojas de excel y manipularlas mediante botones

Jair, Buen dia! "ActiveWindow.DisplayWorkbookTabs = False" Oculta la parte parte de las tabs. Para ocultar algunas hojas en particular podes realizar Sheets("Cliente").Visible = True Sheets("Nodos").Visible = False Sheets("Matrices").Visible = False...
Respuesta en y en 2 temas más a

Solicito un macro para Guardar un XLS como TXT delimitado por tab sin comillas en ningún campo.

Te adjunto la Macro solicitada Sub TXTSaver() Set Tool = Workbooks(ActiveWorkbook.Name) SavePath = Tool.Path 'setear Hoja a Guardar Set SaveSH = Sheets("Hoja1") 'Nombre de Archivo SaveName = "ArchivoTXT " & Format(Date, "dd-mm-yyyy hhmmss") & ".txt"...

Ejecutar una macro u otra dependiente de celda activa

Para realizar esto debes incluir la macro como macro de Hoja conforme print abajo Asi mismo te dejo un codigo que te va a funcionar perfectamente Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 7 Then If Target.Row >= 7 And...
Respuesta en y en 3 temas más a

Macro para copiar fórmulas de fila anterior

Te envío la macro solicitada Debes colocarlo como macro en la hoja que quieres que corra así ante cualquier modificaciónen esa hoja corre la macro y si modifica algún valor de C4: C(LastRow) va a ingresar en el IF Ejemplo de como aplicarlo: Private...

Visual Basic.NET - Texto Vertical en un control button

La Adriano! La sentencia que maneja la direccion del texto es: pevent.Graphics.RotateTransform(90) por lo tanto deberias cambiar el valor () por la direccion que quisieras = 270. Pevent. Graphics. RotateTransform(270) Por favor recuerda valorar la...
Respuesta en y en 2 temas más a

Fórmula para sacar secuencias en excel

Te paso la macro para poder resolver ese problema Tenes que cargarlo como una Macro de Hoja Ingresas a Visual Basic (alt + F11) Seleccionas la hoja correspondiente y ante cada modificacion que hagas en la hoja chequeara la macro. Si el cambio lo...
Respuesta en y en 2 temas más a

Como abrir varias hojas ocultas en un libro de excel

Te paso un Script Deberás setear los nombres de hojas a dejar: Sub Hider() Dim CurrSH As Long Dim i As Long CurrSH = Sheets.Count Do Until CurrSH = 0 'Setea el nombre de la hoja' CSHName = UCase(Sheets(CurrSH).Name) Worksheets(CurrSH).Visible = True...