Joaom Manuel

Sin mucho hablarte (ESCRIBIRTE) TE DEJO UN ENLACE A UN VIDEO DONDE PUEDES BUSCAR Y VER MÁS vídeos En google escribe esto ¿cómo instalar windows 10 desde usb? Este es uno donde puedes aprender, PORQUE escribirte por aquí TODO COMO HACERLO ES HACERLO...

Enrique Feijóo respondió: Solo es cuestión de encontrarle aplicación practica: Public Function Atexto(Un_Texto As String) As String Dim AA As Long For AA = 1 To Len(Un_Texto) Atexto = Atexto & Asc(Mid(Un_Texto, AA, 1)) Next AA End Function Public Function Anumero(Un_Texto As...

Dante Amor respondió: Ese error es porque estás intentado poner un dato en un variable que no es del mismo tipo. Por ejemplo, quieres poner un texto en una variable que es de tipo numérica. Te presenta mensaje de error "No coinciden los tipos" ¿Cómo se corrige? Pues antes...

Rafael Vera respondió: Aquí tienes la macro ajustada para que copie los datos de la hoja "CLIENTES" a la hoja "TEMP_BLOQUE" solo cuando el valor en la columna M sea "NORMAL": Sub CopiarClientesParaBloque() Application.ScreenUpdating = False Dim origen As Worksheet Dim...

Rafael Vera respondió: Para extraer los primeros 10 caracteres del CURP y mostrarlos automáticamente en el segundo cuadro de texto, puedes utilizar el evento Change del primer cuadro de texto. Aquí tienes un ejemplo de cómo hacerlo en VBA para Excel: Private Sub...

Elsa Matilde respondió: Necesito que la columna J y K se rellenen solas cuando la columna L supere a la columna F. Si me guío por esta solicitud, las fórmulas serían las siguientes: Para col J (ajustar el nro de fila): =SI(L4> F4;C4;"") Para col K (ajustar el nro de fila):...

Elsa Matilde respondió: Le hice varios cambios al UF para mantener las opciones de búsqueda, pero considerando qué opción se elige será la col a controlar. Por ej, al crear un nuevo registro, se mira la col B. Con opción de cambiar el dato ingresado o cancelar. Si se graba,...

Rafael Vera respondió: Deseas que la macro verifique la existencia del producto solo en la columna B y no en las columnas A y B. Para lograr esto, necesitarás realizar algunos cambios en el código. Aquí tienes la versión modificada de la macro que verifica la existencia...

Eduardo Pérez Fernández respondió: Ensaye con este código (no lo he probado) Private Sub CommandButton1_Click() Dim i Dim Valor As Double Dim Valor1 As Double For i = 1 To 17 If VBA.IsNumeric(Me.Controls("TextBox" & i).Value) Then Valor = CDbl(Me.Controls("TextBox" & i).Value) 'Valor1...

Rafael Vera respondió: ¿Se refieren a la fórmula o al macro?, ¿O tienes algún ejemplo?