Juan Cosceri

Juan Cosceri

 9.225 puntos  Argentina @juancosceri desde - visto

Respuestas en Visual Basic

Respuesta en y en 2 temas más a

Tengo un problema con una macro ya que me manda error 9 sub indice fuera de intervalo

Jose Luis! Error 9 corresponde a cuando no encuentra el nombre de la Hoja en el Workbook. Aparentemente el After esta bien definido, ¿cómo tienes seteada la variable "Hoja" y "A"? Por favor recuerda valorar la respuesta! Slds Juan
Respuesta en y en 1 temas más a

Macro para filtrar copiar y pegar en una hoja

El problema es que el valor del filtro que tienes puesto es estático ActiveSheet.Range("$A$1:$D$158030").AutoFilter Field:=1, Criteria1:= _ "flores" Podes resolverlo con: Valor = Sheets("scs").range("C3").value y reemplazar la sentencia del filtro...
Respuesta en y en 2 temas más a

Código vba para dividir texto y haga la función de "texto a columnas" automáticamente

Te evio el Código solicitado Columns("A:A").Select Selection.TextToColumns Destination:=Range("A1"), DataType:=xlDelimited, _ TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=False, _ Semicolon:=False, Comma:=True, Space:=False,...
Respuesta en y en 1 temas más a

¿Cómo vincular textbox con combobox en formulario que se abre en una hoja y los datos se toman de una hoja distinta?

No tienes definido la Sheet en la que debe colocar TextBox1.Value = Range(ubica).Offset(0, 1) TextBox2.Value = Range(ubica).Offset(0, 2) 'Reemplazar por TextBox1.Value = Sheets("Datos").Range(ubica).Offset(0, 1) TextBox2.Value = Sheets("Datos")....
Respuesta en y en 1 temas más a

Cerrar solo el libro excel utilizado y no los demás abierto

Te envío el código solicitado Set Tool = Workbooks(ActiveWorkbook.Name) 'DEFINIS EL LIBRO ORIGINAL COMO LIBRO TOOL 'Abre PopUp para abrir Archivo InputWB = Application.GetOpenFilename(, , "Select Files", "Choose Input") Workbooks.Open (InputWB) 'Abre...
Respuesta en y en 1 temas más a

Buscar valor de textbox en una tabla (buscarV)

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 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...