Respuesta
en
Visual Basic
a
Buscar hojas que tienen nombre variable
Te envío la macro solicitada! Sub Macro2() Dim Semana As String Dim NumSemana As Long 'Agrega la Hoja para la pivot al final del Workbook' Sheets.Add After:=Sheets(ActiveWorkbook.Sheets.Count) 'Definis el num de semana (Esto lo hago para que puedas...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Macro para filtrar copiar y pergar
Te envío la macro solicitada Sub Macro1() Set InputSH = Sheets("scs") Set FilterSH = Sheets("salarios") InputSH.Activate Valor = InputSH.Range("C3").Value TableHeaderRow = 1 FilterColumn = 1 LastColumn = 4 LR = FilterSH.Cells(FilterSH.Rows.Count,...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Lista de opciones en un Macro De Excel 2016
Estas utilizando un TextBox y para Desplegables debes utilizar ComboBox. Cambia el TextBox por un Combo Y agregá el siguiente Codigo Private Sub UserForm_Activate() ComboBox1. Clear ComboBox1. AddItem "Select a Type" ComboBox1. AddItem "Emision"...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Como puedo corregir este macro para que seleccione la hoja que deseo, porque me manda a depurar por error 9
Error 9 corresponde a que no encuentra la Hoja, el error lo debe arrojar en la linea Hoja1. Activate En la macro no veo que tengas definido el Set de la Hoja, ¿a qué hoja deberias ir? Debes definir Hoja1 como una variable de Worksheet colocale set...
Respuesta
en
Microsoft Excel
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
Microsoft Excel
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
Microsoft Excel
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
Microsoft Excel
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
Microsoft Excel
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
Microsoft Excel
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...