estimados se podra realizar la Division de un valor que tenga un Textbox3 por el valor que indique el Combobox1? con resultado en 4Combobox desde ya agradecido atte Milton fecha de pago.xlsm

Buenas Tardes Amigos del Foro, estoy tratando de personalizar una plantilla del calendario en excel en la cual lo que se busca es que a través de una macro me coloque el comentario colocado en la hoja parámetros para cada fecha festiva. Ejemplo: En la hoja parametros Celda F36 "Frenta a la fecha 2016-01-01" coloco año nuevo; lo que debería hacer la macro es colocar Año Nuevo como comentario a la celda G13 de la hoja Calendario. Adjunto archivo con lo que llevo del código en el evento Worksheet_Change Espero haber sido claro en la ayuda que requiero y todos sus aportes serán bienvenidos. Gracias Calendario Formulado.xlsm

Buenos días, De antemano muchas gracias por vuestra ayuda. Necesito *******mente crear una macro que copie y pegue datos de un rango entre dos archivos de excel diferentes. Tengo los archivos ECUA11 y ECUA; los dos tienen una única hoja (datos) y están en la carpeta C:\Macro. Necesito lo siguiente: una macro para copiar de ECUA11 el rango de celdas B3:H20 y pegarlo -como valores- en ECUA en el rango B3:H20. Hasta el momento, desde ECUA11 he logrado llamar y abrir el archivo ECUA y también seleccionar en ECUA11 el rango a copiar; a partir de ahí no he sido capaz de pegar los datos ya que siempre me falla (especialmente porque no tengo muy claro que tengo que poner en …

Hola, estoy haciendo un programa en el cual realizo 3 mediciones Serie1, Serie2 y Serie3. Dependiendo si hago dos o 3 mediciones realizo el desvío estándar de dichas series(en este caso estoy mostrando la medición del Peso Corporal) y luego la media o mediana (dependiendo si es 2 media y si es 3 mediana), una vez que realizo eso calculo el Error Técnico de Medición: If lbPesoCorporal.Caption <> "" And txtPesoCorporalS3.Text <> "" Then PesoCorporalDS = WorksheetFunction.StDev_S(txtPesoCorporalS1.Text, txtPesoCorporalS2.Text, txtPesoCorporalS3.Text) PesoCorporalETM = PesoCorporalDS / CDbl(lbPesoCorporal.Caption) lbPesoCorporalET…

Tengo una macro que al exportar una seccion de excel exporta el rango en blanco sin informacion no se por que aqui el codigo Sub Descripcion_jpg() Sheets("Ingreso Productos variables").Select Dim B As String B = Range("C43").Value If B = 2 Then Exit Sub End If Sheets("Descripcion").Select ActiveSheet.Unprotect ("adctv530") Dim rgExp As Range: Set rgExp = Range("B22:K42") Dim archivo As String archivo = Range("A1").Value ''' Copy range as picture onto Clipboard rgExp.CopyPicture Appearance:=xlScreen, Format:=xlBitmap ''' Create an empty chart with exact size of range copied With ActiveSheet.ChartObjects.Add(Left:=rgExp.Left, T…

Espero se encuentren bien, estoy empezando en el mundo de Excel, en mi nuevo trabajo utilizamos AS400 para eliminar unos materiales, me gustaría crear una macro para realizar esta tarea, pero no se como se conecta Excel con AS400, alguien tiene algún vídeo o los pasos para realizarlo. Muchas gracias.

Buenas: He creado un excel con macros (ocultas) que tiene que utilizar otra persona y le da "Error de compilación en el módulo oculto: Ahorros". He investigado y parece que el problema es que mi sistema es de 64 bits y el suyo de 32, como puedo solucionarlo? Gracias

Estimados, Estoy tratando de hacer una macros que me permita abrir todos los archivos de una carpeta, copiar una casilla y pegarla en la tabla de otro archivo, pero al ejecutar me lanza el error previamente mencionado. Si alguien me puede ayudar en esto estaría muy agradecido. Saludos! Option Explicit Sub Open_All_Files() Dim oWbk As Workbook Dim sFil As String Dim sPath As String sPath = "C:\Users\User\Desktop\Respaldo Periodo Felipe 08-03-2012\TERPEL\Planillas TERPEL\checkist total\" ChDir sPath sFil = Dir("*.xlsx") Do While sFil <> "" oWbk = Workbooks.Open(sPath & "ID1 ISLA BILBAO.xlsx") ThisWorkbook.Activate Sheets("Isla").Select With …

Hola buenas tardes! La siguiente macro la quiero utilizar para que me sume valores que voy capturando en determinadas celdas y los acumule en una especifica celda. Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Range("A2:K10"), Target) Is Nothing Then Hoja4.[A1] = Hoja4.[A1] + Target End If End Sub El problema donde me atore es que necesito que solo sume los valores que estoy capturando y no adicione los que ya estaban con anterioridad. por ejemplo: suponiendo que inicio todo de cero y la primer captura es de 100 en la celda "A2" y en la celda "K10" capturo 50 lo que da un total de 150 que es lo que aparecerá en la celda "A…

muy buenas tardes alguien me podría ayudar con mi formulario por favor, tengo un formulario que contiene un listbox en el cual me muestra todos los datos de una tabla, también tiene 4 combobox con los cuale quisiera hacer filtros con cada uno, pero buscando he buscado en Internet filtros con conbobox y solo he hallado 1 que me pareció que funcionaria, pero no lo hizo, el combobox que filtra fechas solo me deja el listbox vacio los combobox filtran fecha, sección , detectado y el ultimo por hora, pero ese ultimo no lo necesito por el momento solo los otros 3 que mencione primero espero que que me puedan ayudar y gracias de ante mano PRUEBA3.0.xlsm

Buenas tardes a todos; -Tengo un procedimiento para crear una marca de agua en el encabezado. -¿Sería posible que dicho encabezado esté centrado en la hoja? Gracias de antemano y saludos a todos. MAgua.zip

Buenas a todos. Soy completamente nuevo en la programación para Excel y no sé muy bien como explicar el problema, pero lo intentaré lo mejor que pueda. Estoy realizando un ejercicio de programación en el que hay que realizar el siguiente proceso: - Se pulsa un botón para ejecutar un procedimiento en una segunda hoja. - Ese procedimiento toma un dato de esa segunda hoja y lo muestra en la primera hoja Para más detalles: 1. Se pulsa el botón "MOSTRAR PALABRA" en la Hoja "Juego" (hoja2) 2. Se ejecuta el procedimiento "elegir_palabra" en la Hoja "Palabras" (hoja1) que consiste en: - Recorrer las celd…

Hola comunidad estoy buscando ayuda para un predicamento , estoy tratando de automatizar un proceso que realizo a diario y lo que quiero es que la macro filtre la base y si en la base no hay criterio,debe validar otro criterio de la base en otra columna y asi sucesivamente. Pongo el codigo de lo que encontre para saber si esto me sirve ya que no entiendo muy bien como funciona Sub Filtrar() Se define el criterio para filtrar. Pero si este no existe criterio que pasa criterio = [B1] Entiendo que aca se hace un si que si el criterio es vacio pues creo que solo filtra, o sea que en este paso podria colocar el segundo validador? If criterio = “” …

Hola a todos, Actualmente tengo una Macro que me funciona bastante bien para abrir un archivo XML, cargando su contenido a partir de una celda de Excel, para visualizar directamente su contenido Sub Macro2() ' ' Macro2 Macro ' ' With ActiveSheet.QueryTables.Add(Connection:= _ "TEXT;C:\Users\Alejandro Figueroa\Nextcloud\WAMTECH\AEC77368930-KD33F0000001553.xml" _ , Destination:=Range("$A$4")) .CommandType = 0 .Name = "AEC77368930-KD33F0000001553" .FieldNames = True .RowNumbers = False .FillAdjacentFormulas = False .PreserveFormatting = True .RefreshOnFileOpen = F…

Hola buenas tardes, Tengo un excel con un UseForm el cual me gustaría poder imprimir en horizontal. Tengo creado un botón de imprimir que tiene un código sencillo que me imprime pero en posición vertical y no se visualizan todos los datos que deseo Private Sub bt_imprimir_Click() FrmListBoxProductos.PrintForm End Sub Mi intencion inicial es poder imprimir el Useform por completo pero si no es posible me basta con poder imprimir el ListBox con las cabeceras Espero me puedan ayudar Saludos, BUENO.xlsm

Hola que tal, Trataré de explicarme con lo que estoy intentando hacer. Tengo una hoja de excel donde en una fila hay un mes con sus días, ejemplo: Enero: 1 2 3 4 5 6 7 ... 31 abajo de esa fila está Febrero: 1 2 3 4 5 6 ... 30 y así consecutivamente cada mes en una fila mas abajo. Cada numero de los días del mes va en una celda. Ejemplo de hoja aquí. Mi duda es como hacerle para que con código al seleccionar una celda o un grupo de celdas donde están los días del mes estas se pongan de un color de fondo especifico. NOTA: Excel me permite ponerle color de fondo a las celdas sin código, nada complicado, pero de esa manera primero hay que seleccionar las celdas y luego…

Que tal compañeros, tengo dos combo box en la cual si seleccio un elemento del primero.. me borraránn varios del segundo, entonces viendo si se vuelve a marcar el elemento que se seleccionó anteriormente marca error de ejecución si bien no me equivoco, entonces estando en los zapatos de un usuario final que no sabe nada de programacion es necesario disfrazar ese error. mandarlo con un msg box que los elementos del combo es volatil y no se puede seleccionar dos veces, se tiene que cerrar el programa y volver abrir para cargar los elementos. lo he intentado con este codigo. On Error Resume Next If Err = 1 Then MsgBox "Error se tiene que cerrar la aplicacion" Cancel = Tr…

Buenas tardes Resulta que ya aprendi a manejar combos, labels y textbox; sin embargo no se manejar listbox, asi que recurro a ustedes a ver si alguien me puede ayudar. En el adjunto hay un archivo que carga existencias, posiciones nombres etc. El problema es que en el userform3 necesito que en un listbox se carguen las posiciones (hoja2 columna f) y cantidades (hoja2 columna i) del codigo buscado por el combo. Y luego que en un label me diga cuanto hay en total. Les agradezco la atencion. Edwin Alexander Galeano I CONTROL 1.3.rar

Buenas tardes, Estoy elaborando una base de datos para llevar un seguimiento de los juegos que tengo comprados en las diversas plataformas. Para ello, he elaborado un excel donde tengo una tabla de registro y una de búsqueda en la primera hoja. Y la base de datos propiamente dicha en la otra hoja. En la primera hoja contamos con un apartado de registro con dos celdas la del nombre del juego y la de la plataforma. Por otro lado, tenemos el apartado de búsqueda donde tenemos las celdas: nombre del juego, ¿Lo tengo? y plataforma/as. En la segunda hoja tenemos un total de 11 tablas (cada una haciendo referencia a una plataforma de juego/tienda). Mi problema …

saludos a todos. esto es un ejemplo corto de una hoja . la original es mas grande tiene mas cuentas que consolidar. lo que ando buscando es lo siguiente. en la hoja control en la columna contabilidad debo ingresar datos que debo de obtener de la hoja balance este balance lo debo de bajar de una aplicacion una vez al mes. para poder consolidar las cuentas que estan en la hoja control. en la hoja balance me van a salir mas de 100 ctas. las cuales salen en orden de cuenta de menor a mayor. pero en la hoja control las cuentas son alrededor de unas 30 y van de menor a mayor. Le estos hablando de la hoja original. la que estoy subiendo es un ejemplo para que…

Hola buen día, nueva mente necesito de a su valioso apoyo, requiero de una macro que me permita copiar datos de una hoja de acuerdo con varias condiciones en otra hoja, necesito actualizar un stock y no deben aparecer los lotes que ya salieron, dentro del archivo adjunto les muestro tres hojas de calculo, donde vienen las especificaciones. espero que alguien pueda apoyarme, de antemano muchas gracias EYS-STOCK.xlsx

Hola espero que se las hayan pasado muy bien en compañia de su seres queridos en las pasadas fetividades queridos master la siguiente es para ver si alguien me podria hechar la mano con este problemita el cual adjunto archivo con la explicacion espero que si me entiendan que es lo que deceo lograr Sample.rar

Hola a todos! Tengo un formulario en VBA para registrar datos en una tabla de excel. Lo que necesito, es que cada vez que se hace click en el botón "Registrar" de mi formulario, en la primera celda de cada fila vaya generando algo así como un Autonumerico con formato "REG-0001" y al volver a cargar datos en el formulario y al apretar nuevamente dicho botón, lo haga con el código "REG-0002" ...03,04 y así sucesivamente.... ¿Alguien me puede guiar? ¡Gracias!

Estimados: Estos datos salen de una tabla dinamica (por cuestiones de peso del archivo, he pegado los datos como valores). Los mismos son extraidos de una tabla de mas o menos 15000 registros, donde cada valor de la columna A puede tener varios registros en la columna B, sin duplicar los de la columna B, pero si los de la A. Lo que necesito hacer es lo siguiente: Extraer de todos estos datos, los que cumplan con ciertos criterios, verificando otros criterios. Es decir: necesitaria que el sistema verifique todos los registros que sean NN. Siendo NN = Verdadero, que seleccione aquellos registros de la columna A, la columna E, la mas alta, y el valor de la column…

Hola a todos. Llevo un tiempo dándole vueltas a este ejercicio y no acabo de sacarlo. Quería saber si podéis ayudarme a resolverlo. Tengo una tabla con 2 columnas (Alumno, Idioma) en la Hoja3. Necesito añadir los valores únicos de la columna "Alumno" a un ComboBox para que sólo aparezca una vez cada nombre. Después al seleccionar un nombre en el ComboBox pasaría automáticamente a la Hoja2 y cargaría en el Combobox de esa hoja los idiomas de la columna "Idiomas", pero sólamente los que tenga el alumno que hemos seleccionado en el Combobox de la Hoja1. Por ejemplo: - Se abre el archivo por la Hoja1 - En la lista "Alumn…