Hola: estoy tratando de hacer un pequeño generador de codigos para asignar nombres diferentes archivos, la idea es seleccionar la celda correspondiente la planos o memorias y que al pulsar el boton me asigne un nuevo codigo en forma autonumerica , concatenando el nombre de la empresa, cliente y tipo de archivo. Si es posible que me guiaran un poco para lograr esto lo agradeceria muchisimo. generador codigos.rar

Estimados, para partir decir que he aprendido bastante navegando por los distintos temas del foro y le agradezco a todos los aportes. Ahora vamos con mi problema, estoy creando un formulario para agilizar la captura de distintos report en una base de datos. Hasta ahora me a ido bien, pero me encontré con el problema con el uso de CheckBox. Mi idea es que al guardar todos los datos ingresados y tener marcado un CheckBox, las casillas que estén marcadas agreguen el texto "A DESCUENTO" en una celda designada. No sé si me explico bien, me gustaría poder enviar mi planilla pero por razones de seguridad no puedo hacerlo ya que los datos son privados de la empresa. Más o men…

Hola, soy nuevo en el foro y los quiero felicitar por el buen contenido que tienen. Mi consulta es la siguiente: Tengo una planilla de varias columnas a las que luego quiero convertir a .txt pero donde cada columna debe estar separada de la siguiente por punto y coma. Normalmente guado la hoja como .csv y listo, pero quería automatizar algunas cositas que paso a nombrar: a) El archivo se compone de una cabecera en la primer fila, la que incluye el total (sumatoria en F1 que viene de una tabla dinámica) de valores de las filas del cuerpo. En este punto mi problema es que si son mas de 50 registros no me sirve como tengo actualmente el archivo, ya que el total lo traig…

Estimados, Quisiera saber si existe una linea de comando para desmarcar un Toggle Button (o todos los demas), el asunto es el siguiente tengo 2 botones TB1 y TB2, me gustaria que cuando se presione el TB1 si el TB2 es true cambiara a false. Eso espero que puedan ayudarme gracias. Saludos.

Hola a todos de nuevo, tengo una preguntilla, aunque me temo que en este caso la respuesta va a ser que no se puede hacer lo que necesito: Tengo una tabla dinámica donde he introducido un campo calculado "indx10Ha" que me debe coger los valores de otro campo "ind" (que es una función promedio) y multiplicarlos por 4, sencillito hasta aquí. El problema viene en que eso lo debe hacer sólo en la mitad de los valores (los que corresponden con datos "DB" (dentro de banda) y no con los datos "FB" (fuera de banda), (sin ver el ejemplo no creo que con esta explicación os aclaréis mucho") lógicamente la tabla dinámica lo hace con ambos valores, DB y FB, El fallo no es demasiado …

Buenas noches, Quisiera pedirles ayuda con la formulación de un código para el siguiente problema. Los datos se ingresan a través de un Textbox hacia un Listbox y lo que necesito es que una ves en el Listbox mediante un msgbox informe cuantas unidades de cada código se ingresaron y por ultimo, se grabe en una pestaña del excel. Ejemplo: Se guardaran los siguientes datos: A03223 2 und A03225 3 und etc ...... Private Sub CommandButton1_Click() ListBox1.AddItem (TextBox1.Text) End Sub Private Sub CommandButton2_Click() 'Debe guardar los datos del ListBox junto a la veces que se repiten en un apestaña de excel End Sub [/CODE] Adjunto e…

Tengo un archivo en excel tipico de ventas (ciudad, vendedor,ventas..etc) esta informacion esta en la hoja1 y quiero hacer una consulta desde visual basic tipo SQL (Select "Ciudad" from Ventas.xlsm where Ventas > 100). El recordset debera llegar a una hoja de excel del mismo libro (Ventas.xlsm) hoja2 Me pueden ayudar con el codigo de coneccion y si se requiere configurar el equipo para poder hacerlo. Envio Archivo .xls dado que la extension xlsm no pude subirla Gracias Ventas.xls

Estimados Buen dia Tengo una duda que no he logrado encontrar un camino para salvarlo. Tengo que traer datos de paginas web, indicadores económicos principalmente, pero en algunos casos las paginas web solicitan un código captcha, lo que no me permite traer los datos desde dicha pagina web. Mi pregunta es: Es posible evitar este dicho código? Saludos Cordiales Pedro Venegas Q.

buenas tardes, escribo con la finalidad de solicitar ayuda en cuanto a una base de datos en la cual tengo 11 columnas de las cuales las 7 primeras tienen valores duplicados, y en las 4 ultimas estos valores deben sumarse al eliminar duplicados.cargo un excel con dos hojas, Hoja1 como se muestran los duplicados y Hoja2 como debería ser el resultado.espero me puedan colaborar con esta base de datos.Gracias de antemano Prueba Utilidades.rar

Amigos, Tengo un problema con un código, espero me puedan ayudar a solucionar el problema. Tengo excel 2010, y estoy tratando de enviar un reporte por email desde excel, intenté hacerlo con gmail directamente pero no pude insertar en el cuerpo del mensaje con texto enriquecido, es decir incertar una tabla con colores etc... por lo que lo hice con outlook, pero el problema que tengo ahora es que no me adjunta el archivo. el codigo que utilizo es el siguiente: Option Explicit Sub Mail_Range_Outlook_Body() Dim rng As Range Dim OutApp As Object Dim OutMail As Object Dim ruta As Variant With Application .EnableEvents = False …

Buenos Días, en una hoja activa seria posible tener algo así como una ventana flotante en la que pudiera configurar varios botones con distintas macros cada uno.? Sin que tener que poner los botones directamente en la hoja activa. Saludos

Saludos, lo que se requiere es crear una lista con los nombres de las hojas de cada libro de excel, dividido ese listado por el nombre del libro, "algo muy similar a un listado de árbol de archivo de windows" pero con las hojas del libro de excel. si se pudiera hacer para varios archivos a la vez seria genial.

Buenas noches Me gustaria un poco de colaboracion con una macro que necesito hacer.. Tengo dos columnas en hojas diferentes con la identificacion de clientes, necesito comparar la hoja1 con la hoja2 y donde alla coincidencias copiar los datos de contacto tel,email, direccion etc en la hoja1

Buenas.. Este es un pedido o requerimiento que no encontré en el foro. Yo tengo un archivo excel llamado Base.xls donde es mi archivo en blanco o base, es decir como un formulario en blanco.En el cual contendrá varias hojas con títulos en columnas y macros ya que supone empezar a ser una base de datos de algo especifico. Entonces, Yo desde otro archivo el cual llamare INICIO.xls pondré a funcionar un programa. En el mismo tendrá un botón de "+nuevo maquina" por ejemplo. El macro que necesitaría es uno que me copie mi archivo base cree una copia en un lugar especifico y me permita escribir el nombre de la "nueva maquina". Y así tantas veces me copie y renombre …

Estimados amigos del foro. para pasar de numeros a arabigos a romanos en codigo macro me han sugerido usar evaluate(= En realidad quiero que lo que esta en un combobox CbxRoman pueda mostrarse en numeros arabigos Asi: Sub GetNumeroRomano() Dim d As Long d = 22 'CbxArabigo.value MsgBox Evaluate("=ROMAN(" & d & ")") End Sub pero a la inversa para pasar de romano a arabigo no encuentro el modo he probado así: Sub GetNumeroArabe() Dim d As String d = "II" 'CbxRoman.value MsgBox Evaluate("=NUMERO.ARABE(" & d & ")") End Sub Pero no funciona Tienen alguna sugerencia? Gracias

Hola a todos, he mirado en varios sitios, incluido aquí pero no consigo aclararme para poder crearlo, por eso os pido ayuda con esto. Necesito crear un treeview con los datos que adjunto en el archivo, tambien si es posible si conoceis de algun tutorial donde lo explique con mucha claridad ya que tengo que crear otro treeview pero con más cosas. Espero vuestra ayuda. Gracias vademecum.xlsm

Macro para mantener Formato de Celda destino Hola buen dia... recurro a ustedes porque soy muy novata en eso de los macros y he leido varias de sus experiencias. Necesito una macro en la cual al pegar en la columna A cualquier tipo de dato (numero, texto, fecha, etc), no modifique el formato destino, en este caso TEXTO. Ademas de que agradeceria me expliquen como ejecutarla, ya que esta diseñada para un usuariO final que solo sabe capturar, copiar, pegar, guardar. Se que al crearla hay un metodo abreviado perono se como usarlo. Gracias

Hola de nuevo, a ver si me podéis ayudar con esto. Estoy haciendo una tabla dinámica con una macro, el problema es que tengo que agregar dos campos calculados que representen el porcentaje de unos datos, y claro, para hacer el porcentaje necesito tener previamente el total, que me lo da precisamente la tabla dinámica, así que no sé cómo hacerlo, porque no sé qué fórmula puedo usar para hacer referencia al campo "totales" que me da la tabla dinámica. Os paso un excel con los datos de origen,en "vuelos1" está la tabla dinámica que crea la macro y al lado de esa una creada a mano con lo que pretendo conseguir, lo que me falta son las dos columnas de porcentajes, llevo toda …

Hola a todos, Adjunto mi archivo, el cuel tiene los textbox 13 y 14 que deben ser en formato contabilidad o moneda, en el se muestra el codigo que estoy usando (me lo pasaron por aqui) pero, este no es reconocido como numero, cual seria el codigo que debo usar y donde lo debo colocar para que se pueda ingresar de tal manera, en realidad no manejo muy bien el VB. Muchisimas Gracias por su amable apoyo. Saludos, EJEMPLO OC.zip

¿Cómo hago para mostrar una barra de progreso en excel mientras el ejecuta mi macro? Es decir, tengo este archivo que me calcula muchas formulas de SUMAPRODUCTO y lo deje en modo manual, porque uso macros para otras cosas, y quiero que al ejecutar la macro me muestre una barra de progreso, pero no estoy seguro de como hacerlo, busque información pero no logro entender bien como hacerla con mi macro. No se si hay una mejor forma de haberla me gustaría me guiaran a hacerlo de la mas optima forma. prueba.rar

Estimados, Junto con saludarlos, agradezco de antemano su tiempo y colaboración en un tema que ya me ha sacado mas de una cana y que me ha motivado a aprender sobre excel, llegar a su foro, he buscado en el foro, pero aun no encuentros la solución... Les cuento el problema: Tengo que generar una planilla o plantilla de cotización, donde varían los Entregables según cada cotización. Los Entregables son en principio iguales para cada cotización, y a traves de un proceso de selección por casillas de verificación u otro sistema similar, selecciono los entregables que requiero para la cotización que efectuare. el problema es que necesito que esos entregables seleccionados se…

Ando Atrapado En Mi Proyecto De Control De Almacén en un pequeño error de que no puedo mostrar mas de diez columnas en mi listbox y no se como solucionar ese error lo deje comentado en el listBox programación dejo el archivo para ver si alguien me puede apoyar y pues si el archivo les sirve os dejo como obsequio INVENTARIO.xlsm

Hola a todos, estoy haciendo un UserForm (que me funciona) pero no sé ni encuentro por ninguna parte como se insertan los iconos de Gravedad, Exclamación, Información y Questión como en MsgBox me imagino que se puede hacer como "Imagen" pero no encuentro los dibujos. como lo hago ? De antemano muchas gracias

¡hola Por favor si alguien me puede ayudar, necesito ocultar la barra de desplazamiento vertical de un cuadro de lista en VBA Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long Private Declare Function ShowScrollBar Lib "user32" (ByVal hWnd As Long, ByVal wBar As Long, ByVal bShow As Long) As Long Private Const SB_HORZ = 0 Private Const SB_VERT = 1 Private Const SB_BOTH = 3 Private Sub ListBox1_Click() End Sub Private Sub UserForm_Initialize() Dim lngMyHandle As Long lngMyHandle = FindWindow("THUNDERDFRAME", Me.Caption) ShowScrollBar lngMyHandle, SB_BOTH, True End…

Buenas tardes!A través del presente requiero de su valioso apoyo para saber como utilizar la Referencia XML V6.0 Ya que el siguiente código me funciona correctamente con la versión 3.0, y me gustaría saber como actualizar para que funcione de la misma manera. Codigo XML v3.0 Option Explicit 'Variables de Lectura de archivos XML Private DocumentoXML As MSXML2.DOMDocument Private ListaNodos As MSXML2.IXMLDOMNodeList Private Nodo As MSXML2.IXMLDOMNode Function CargaXML(RutaXML As String) Set DocumentoXML = New DOMDocument DocumentoXML.Load (RutaXML) End Function Function Comprobante(Ruta As String, Dato As String) CargarXML (Ruta) Set ListaNodos =…