jerryeagle

jerryeagle

 108K puntos  Jalisco, México @jerryeagle desde - visto

Respuestas en Microsoft Excel

Respuesta en a

Problema con TextBox de Formulario

No med queda claro por que debe aparecer otro userform y poner otro valor, ¿es para diferentes celdas? Si es solo un textbox, mejor usa un InputBox Range("Tu Celda").Value = Val(InputBox("Escriba un número") Si pudieras explicar mejor qué es lo que...
Respuesta en a

Busca, copia y pega.

Esto se puede hacer sin macros, usa la función BUSCARV, en la celda donde quieres poner por ejemplo el nombre del Cliente, escribe: =BUSCARV("Valor", "Rango", "Columnas", "V/F") Explicacion: Valor = El valor a buscar (Codigo por ejm) Rango = En que...
Respuesta en a

! Macro para validar datos!

En el evento Worksheet_Change pon esto: Private Sub Worksheet_Change(ByVal Target As Range) Dim Consecutivo, Formato As String Application.ScreenUpdating = False Consecutivo = Range("C2").Value If Target.Address = "$C$2" And Not Target.Value = ""...
Respuesta en a

Buscar en columna un valor modifica y busca seguí

Hice una macro con la que incluso puedes hacerlo más dinámico, con un inputbox preguntas que el valor que deseas buscar y con otro inputbox le dices el nuevo valor. Dim V1, V2 As Variant V1 = InputBox("Escriba el valor que desee Modificar") V2 =...
Respuesta en a

Macro para modificar tipo de fecha

Usa esto: Sub fecha() Dim U As Long U = Range("e65536").End(xlUp). Row 'Guarda en la Variable U el numero de la ultima fila Range("E2", Cells(U, 5)).Select 'Selecciona solo el rango de datos Selection.NumberFormat = "mm/dd/yy" 'Cambia al formato que...
Respuesta en a

Macro cambio estado "visible" de una hoja

Activesheet.visible = XlVerHidden o Sheets("Nombre de Hoja").viible = XlVeryHidden para volver a hacerla visible pon = True (Respectivamente)

Buscar Datos

En el evento AfterUpdate del textbox pon algo así (Tu adomodalo a como estén tus datos): If not Cells.Find(TextBox1.Value) is nothing then Msgbox "El registro que escribió ya existe, escriba otro" With textbox1 .SetFocus .Value = "" end with exit sub...
Respuesta en a

Error en Macro que crea una Tabla Dinámica

ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _ "Hoja1!R7C1:R65536C6", Version:=xlPivotTableVersion10).CreatePivotTable _ TableDestination:="", TableName:="Tabla dinámica22", _ DefaultVersion:=xlPivotTableVersion10 Intenta así.
Respuesta en a

ComboBox

Suponiendo que tus datos empiezan en A2 pon esto en el evento initialize del Userform. ComboBox.List = Sheets("Hoja2").Range("A2",Range("A65536").End(xlUp)).Value
Respuesta en a

Carga de listbox desde una tabla de excel

Creo entender lo que quieres hacer, un control listbox es de solo lectura, así que tendría que ser con un combobox, suponiendo que Centro de Gestión esta en la Columna A y Nombre del Centro en B y tus encabezados están en la fila 2, en el evento...

Suscríbete RSS