hola que tal expertos espero me puedan dedicar un poquito de su tiempo y pasciencia para aclarar esta duda que tengo ya que lo que intento hacer es una especie de control tipo calendario con un combobox donde al darle click en un combobox me despliegue un formato parecido al del dtpicker o calendario donde el combo box tiene un formato de este tipo combobox = Format(combobox, "dd/mmmm/yyyy") he logrado hacer una lista para dia otra para mes y otra para año, pero estan en distintos comboboxes mi pregunta es el como unir esas listas para que aparescan en un solo combobox,,,no he querido utilizar los calendarios o los dtpicker pporque no forman parte estandar de e…

Buenos Días: Necesito una macro que me busque un producto en la columna nombre producto cuando lo encuentre me traiga el dato de la columna codigoestado pero su numero mayor en este caso 9 y solicitar que si lo desea pasar a 10 que es un codigo nuevo. Agradezco su ayuda

Buenas amigos foristas Tengo una macro la cual toma los datos de una hoja y con eso se llena una base de datos de una aplicacion que tenemos, en la actualidad coloco For i = 4 To 8 session.findById("wnd[1]/usr/cmbRF02D-KTOKD").Key = objSheet.Cells(i, 35) session.findById("wnd[1]/usr/ctxtRF02D-BUKRS").Text = objSheet.Cells(i, 36) Next i Lo que deseo es que en la macro si existe informacion en la fila siguiente ejecuta el proceso sino pare Agrdezco su colaboracion Fernando Trujillo

Buena Tardes, Les escribo en esta oportunidad, debido a que estoy teniendo problemas con una macro de intersección de rangos de fechas el cual realice para que cumpliese con mis necesidades, el cual es que me diga si chocan en sus periodos de vacaciones el supervisor y el tablerista, así como los turbinista_1 y turbinista_2 entre si y con el tablerista; y por ultimo los turbinaista_1, turbinista_2 y Operador Auxiliar de Turbina (op. aux. tur.). El problema que estoy teniendo es que haga lo que haga siempre me aparece la ventana que dice: "Coinciden Tus Vacaciones Con la Segunda Fracción del Tablerista" o "Coinciden Tus Vacaciones Con la Segunda Fracción del Supervisor…

Buenas tardes amigos, los felicito x tan excelente foro. Necesito con caracter de urgencia la ayuda de ustedes, requiero una macro que se ejecute de acuerdo a algunas condiciones, en un rango de celdas si agrego en una celda la letra P se ejecute la macro 1, si escribo una letra R en cualquier celda del rango, se ejecute la macro 2, y si escribo una I, se ejecute la macro 3. Muchas gracias de ante mano.

Necesito un archivo para controlar el inventario de activos fijos. En donde contenga una pagina de inicio con las opciones: Ingreso al inventario, Egreso del inventario, Traslado de inventario. En la opcion: ingreso de inventario se desplegarian o aparecen los campos: -- Activo. -- Descripcion --- Ubicacion -- Comprado con --Cuenta --Cheque -- Lugar de Compra --Factura --Recibo --Fecha de compra --Donado por: --Feha de donacion -- Otros

Buenas Noches, Me gustaria puedan apoyarme con el siguiente adjunto, en el cuento con un userform, en el cual completo todos los datos y van a sus respectivas columnas, y si selecciono un combobox este debe ir debe ir en la fila "L" pero no se como hacerlo . Por otro lado, este combobox tiene los mismos nombres que las pestañas por lo que al seleccionar deberan copiarse también automáticamente a sus respectivas pestañas siendo solo las columnas J, I, A, C, G,H, de la hoja Ordenes siempre en la primera fila vacía que se encuentre. Agradezco su amable atención, Saludos, GENERAL ORDENES 2014 - EJEMPLO.zip

Hola amigos expertos, muy buenas tardes, me he encontrado con una limitante en un archivo en el que trabajo, y esperaba que me brindarán un poco de su tiempo para asesorarme y con ello poder resolver este problema. Tengo una hoja "Pagos" y una "compras a crédito", en la hoja pagos mediante una lista de validación ubicada en la celda "B9", se encuentran los números de serie de las facturas o registro de movimiento. Mediante esta lista pretendo llenar todos los campos debajo"A11:F27", por ejemplo; al momento de elegir un registro de factura, automáticamente se llenasen los campos antes mencionados de la hoja "compras a crédito".Si observan en mi archivo esto se logra hac…

Hola amigos espero me puedan ayudar, tengo una archivo de excel con macro con el codigo vba protegido con contraseña y con compartir, pero detecte que cuando el usuario usa el administrador de tareas para cerrar a la fuerza el archivo de excel, este se abre como si no le hubiese puesto protección de bloqueo al projecto vba. La opción más adecuada que encontre fue modificar el registro de windows con CMD, en esta web encontre un buen código: using command prompt from VBA Sub x() Dim Par As String Par = "dir c:\ /s/p" Call Shell("C:\WINDOWS\system32\cmd.exe /c " & Par, 1) End Sub yo lo he transformado de la siguiente manera Sub Deshabilitar() Dim…

Tengo mi Formulario De Generar TXT el cual esta coformado de 3 partes 1.- Head(Encabezado, que lo crea en el formulario)(ya esta la creacion del Encabezado) 2.- Body(Lo copia de otro Libro(ya esta el copiado) 3.- Trial(Tambien lo crea del Formulario y va en la parte Final del Archivo de Texto) Ya tengo la 3 partes me las Genera en un libro(consolidado) y Tambien ya me crea mi Archivo de Texto(con ruta fija) pero quiero que al Generar el Archivo de Text no copie las Lineas en blanco, aquie les dejo la Estructura. 1. El archivo debe contener un solo header y debe estar en la línea uno.(LISTO) 2. Debe contener por lo menos una línea en el body(detalle) (Boton de Cop…

Estimados, Tengo un excel y una base de datos access, quiero sin utilizar formulario, solo con las referencias en las celdas, poder modificar un registro en mi base de datos acces. La idea es que busque el ID del registro y modifique el estado de "pendiente" a "terminado" pero no lo he podido hacer. Agradezco puedan ayudarme. Saludos!

Hola muy buenos días compañeros del foro, solicitando su valiosa ayuda: Como puedo crear un archivo txt con la codificación UTF-8 o en su caso hacer la conversión de ANSI a UTF-8 desde VBA Excel. De antemano, gracias.

AMIG@S, Agradeceré sus apoyos para solucionar con problemita en excel vba, les comento: Estoy tratando de automatizar una tarea, se trata registro de evaluaciones de check list de calidad en atención. He adjunto una replica del trabajo con los datos minimos por tema de capacidad. El formulario tiene un frame donde se ingresaran los datos del empleado mediante cajas de texto, tambien un multipages con 2 paginas (1 atributo por pagina), dentro de estas paginas existen 3 criterios de evaluación (label) y cada uno con 3 resultados (SI - NO - N.A.) estos últimos son optionbutton. En el archivo original tiene 4 multipage c/u con 4 a 5 paginas he avanzado gran parte del mini…

Hola buenas tardes, hace un tiempo me echasteis una mano por aqui y hasta ahora todo ha ido bien, pero e aqui que he actualizado mi Windows 7 al Windows 10 y lo primero que he echo ha sido probar mi programa que hice de la comunidad y cual es mi sorpresa que me da error en las macros justo de momento en esta linea Private Sub Worksheet_SelectionChange(ByVal Target As Range) La macro entera es asi. Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Not Application.Intersect(Target, Range("B30:B45,B49:B56,B58")) Is Nothing Then UserForm1.Show End If End Sub Podeis ayudarme donde esta el fallo o es que Windows 10 NO admite el vb Repito que en Windows 7 …

Estimados, Les pido ayuda con lo siguiente. Hace un tiempo había solicitado algo parecido, pero luego tuve que cambiar el formato de la tabla y no supe cómo solucionarlo. Según el ejemplo adjunto, en las columnas X/AI se ingresa manualmente un importe relacionado a la facturación del mes que representa cada columna. Cada vez que se ingresa uno de estos importes, en las columnas A/L (que son el reflejo de cada mes representado en X/AI) la macro debe colocar automáticamente un número único correlativo ascendente (comenzando desde el 1) en el mes indicado. Este número debe ir aumentando por orden de introducción. En el adjunto, a manera de ejemplo muestro lo siguiente: …

Hola. He escrito un Macro en un libro de Excel para que traiga información desde otro archivo de Excel, (ambos .xls), pero el código sólo trae 16.383 filas y las demás las borra. ¿Puede haber un máximo para este tipo de código?¿Por cuál lo puedo reemplazar para que no tenga este problema?. Transcribo el código que hace la conexión y trae los registros: 'crea la conexión Set Conn = New ADODB.Connection Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _ "Data Source= C:\Users\Proyecto\gestion.xls;" & _ "Extended Properties=""Excel 8.0;HDR=Yes;IMEX=1;""" 'crea el recordset Set rs = New ADODB.Recordset 'Selecciona lo…

Hola a todos, Hace un tiempo un usuario de Ayudaexcel muy amablemente me ayudó con el código de un formulario que adjunto a continuación, quería saber si es posible hacer lo mismo pero al reves, o sea que en el combobox salgan los nombres y en el list box los cursos, tomar en cuenta que los cursos seran siempre 6 pero los nombres puede aumentar Lo habia intentado pero solo funcionó para un dato del listbox, no me salio completo u_u Muchas gracias de antemano. Libro Modificado.xls

Buenas tardes, gracias por la colaboración que me han brindado, me ha servido muchísimo, pero tengo otra necesidad, como es otro tema por eso lo adiciono, es lo siguiente: 1. Tengo un archivo el cual esta compuesto por información diaria según el día, o sea "1" si es día "1", "2" si es el días "2" y así sucesivamente, en cada día hay unos módulos compuestos por 20 filas, estándar. 2. Diariamente se digita la información requerida, "identificación", "nombre", "tratamiento", "cantidad", etc... 3. Al final del día, Manualmente señalo lo que hizo cada modulo y lo copio a un archivo que se llama "Datos", o sea donde esta toda la base de datos y con ella empiezo a realizar l…

Que tal amigos buen día, Pues estuve buscando en varios lados, inclusive aquí sobre como detectar información que este duplicada pero con diferente orden, por lo regular encuentro información sobre como encontrar valores duplicados, pero no encuentro como encontrar duplicados con diferente orden, les dejo un ejemplo: Tipo Oración Estatus Comentario OS Este es un ejemplo simple. Gracias por la ayuda Repetida! Rep1 OS Gracias por la ayuda. Este es un ejemplo simple Repetida! Rep1 OS Esta es otra o…

Buenas noches: Tengo un formulario para dar de alta a entidades. Al introducir los datos de cada una quiero que se les de un id; sin embargo, me da el siguiente error: cuando grabo un registro nuevo me "machaca el que tenía registrado y me asigna siempre el Id 1 y así sucesivamente, de tal forma que va eliminado los registros y solo queda el último???? Me puede alguien echar una mano y decidme dónde esta el error??? Dejo el enlace con el archivo. https://drive.google.com/open?id=1W4TnIlIZem36J9qmELBccHvfzgBCsd1V Muchas gracias!!!

Hola buenas tardes a los expertos de este foro y quizás mi inquietud sea simple de resolver, pero, he intentado en varias ocasiones solucionarlo y no he podido, es por eso de que busco de su apoyo. Tengo un libro de Excel, el cual a través de un formulario y de seleccionar por medio de un Listbox un dato, en automático tome los datos de las celdas de excel y se reflejen en el formulario, anteriormente había hecho esta consulta, pero, la macro con la que se me apoyo, me genera algunos errores. Subo el archivo y en el viene mas detallada la explicación para ver si hay alguien que me pueda apoyar con este tema. Gracias ejemplo.xlsx

hola buen dia. quisiera ayuda en este proyecto para guardar datos en rangos diferentes de celdas y que al guardar los coloque al inicio de la base datos y no al ultimo como lo hace ahora esta es la macro Sub GUARDAR_DATOS() Dim NombreHoja As String Dim HojaDestino As Range Dim NuevaFila As Integer Dim FilasFactura As Integer Dim i As Integer …

Hola a todos, Tengo el siguiente problema: He creado un formulario para grabar contactos dentro de una hoja de datos llamada "CONTACTOS" y cada vez que introduzco algún dato incorrecto, de manera alguna el formulario vuelve a grabar el mismo registro tantas veces como haya fallado dentro de la hoja de datos. Muestro por aquí mi formulario... Como se puede observar en la imagen adjunta, tiene un casillero inicial para elegir el tipo de contacto ("Proveedor" o "Cliente") y el resto de los datos están dispuestos en modo multipágina. "Denominación" para grabar los datos fiscales, "Domiciliación" para los datos de localización y "Comunicación" para los dat…

Hola grupo recurro a ustedes para la ayuda para completar un Macro Tengo este macro que me valida desde Excel si un dato ya existe en la base de datos de ACCESS. Set Rs = New ADODB.Recordset Sql = "SELECT Count(*) FROM a_revisiones WHERE [cedula]='" & .Range("J2") & "'" Rs.Open Sql, Cnn, 3, 3, adCmdText Datos = Rs.GetRows If Datos(0, 0) > 0 Then MsgBox "El registro ya existe en la base de datos!!!", vbCritical, "Sistema" Else Nombre de base de datos en Access "a_revisiones", campos "cedula, nombre y estado" Me funciona bien cuando solo solo requiero ingresar un registro igual en cedula, cuando debo registrar más datos me…

Buenos días Necesito activar el complemento Microsoft Date and Time Picker Control Tengo Excel 2019 y no encuentro manera de resolverlo Desde ya muchas gracias a quien pueda ayudarme