James Bond

James Bond

Si de mis mayores gustos, mis disgustos han nacido, gustos al cielo le pido aunque me cuesten disgustos
 321K puntos  Monterrey, México @eusebiosuarez desde - visto

Actividad pública reciente

Ha respondido en y en 2 temas más

Cambiar color de texto a blanco según el valor de una celda con fórmula.

Usa esta macro pégala en el modulo de la hoja donde tengas la fórmula Private Sub Worksheet_Change(ByVal Target As Range) If Range("a1") = 1 Then Range("g5:h10").Font.ColorIndex = 2 Else Range("g5:h10").Font.ColorIndex = 1 End If end sub en cuanto...
Ha respondido en y en 1 temas más

Listbox con más de 15 columnas

Prueba Private Sub UserForm_Initialize() con un array 'matriz = Range("c1").CurrentRegion 'With ListBox1 ' .List = matriz ' .ColumnCount = Range("c1").CurrentRegion.Columns.Count 'End With con rowsourcee y encabezados With ListBox1 .RowSource =...
Ha respondido en y en 3 temas más

¿Un listbox puede tener más de 11 columnas? Vba excel

Private Sub UserForm_Initialize() 'matriz = Range("c1").CurrentRegion 'With ListBox1 ' .List = matriz ' .ColumnCount = Range("c1").CurrentRegion.Columns.Count 'End With With ListBox1 .RowSource = Range("c1").CurrentRegion.Columns.Address .ColumnCount...
Ha respondido en y en 1 temas más

Corrección de código para enviar datos a una hoja del mismo libro

Cambia .Worksheets("Hoja1").Range("D2").Value = Me.cbo_not .Worksheets("Hoja2").Range("T3").Value = Me.cbo_not por .Worksheets("Hoja6").Range("D2").Value = Me.cbo_not .Worksheets("Hoja10").Range("T3").Value = Me.cbo_not y asi sucesivamente de ahi en...
Ha respondido en

Funcion formato condicional como puedo anexar una formula que pueda incluir un rango de numeros igual o mayor que y menor o igua

En la opción de formatos aparece esta pantalla seleccionas la opción que quieras y con el botón formato das el color
Ha respondido en y en 2 temas más

Cómo cerrar dos formularios con un único botón

'Cerrar formulario Private Sub CommandButton2_Click() end End Sub es asi
Ha respondido en

¿Como hago para crear un intervalo de > y < "que" condicionado en un Textbox?

Prueba con este codigo Private Sub TextBox1_AfterUpdate() Select Case TextBox1 Case Is < 20: TextBox2 = "bajo": TextBox2.BackColor = RGB(0, 255, 255) Case 20 To 41: TextBox2 = "adecuado": TextBox2.BackColor = RGB(0, 0, 255) Case 42 To 75: TextBox2 =...
Ha respondido en y en 1 temas más

Abrir un formulario desde la elección hecha en un listbox

Este es el resultado de la macro, en el evento dobleclick o click del listbox del formulario 1 tecleas el código que esta abajo de esta imagen y es todo codigo para el formulario 1 Private Sub ListBox1_Click() UserForm2.Show End Sub codigo para el...
Ha respondido en y en 2 temas más

Se puede crear una macro que sume valores repetidos en excel?

Este es el resultado de la macro Y esta es la macro, primero hará un filtro para eliminar los repetidos y luego hará la sumatoria usando el numero de la cedula como condición para sumar Option Base 1 Sub totaliza() Dim unicos As New Collection Set...
Ha respondido en y en 4 temas más

Dónde modificar código Array en vba Excel para hacer que tome datos desde una fila específica para un Listbox

Se puede hacer de dos maneras y con mucho menos código del que estas usando este es el primer ejemplo cuando es una tabla simple, el resultado esta en la imagen que sigue al código Private Sub UserForm_Initialize() With Range("b2").CurrentRegion...
Ha respondido en y en 1 temas más

Macro ordenar un rango por varios criterios?

Te dejo esta macro para 3 criterios, esta macro tiene la ventaja que es dinámica puede agregar o quitar filas o columnas e igual ordenara los registros que tengan Sub ordenar() Set tabla = Range("a7").CurrentRegion With tabla .Sort _...
Ha respondido en

Borrar filas de dos hojas diferentes

Si se hace con un for... next o con un for each... next y un if donde pones la condición por ejemplo si una celda de una hoja es igual a la celda de otra hoja entonces se borra o con una función contar para borrar todas aquellas que tengan más de un...
Ha respondido en y en 1 temas más

Se pueden unir dos rangos con nombres?

Creas un rango que se llame todos y le das el rango a2:b9, la otra es hacer lo que no quieres dos columnas en la B el modelo del carro y en la A la marca a que corresponde por ejemplo Fiat florino Fiat uno ... Chevrolet joy Chevrolet onix Te aconsejo...
Ha respondido en y en 2 temas más

Como conservo valores de commandbutton

Prueba con esto Public K1, K2, K3 As String Private Sub CommandButton1_Click() MsgBox K1 MsgBox K2 MsgBox K3 'hasta aqui bien End Sub Private Sub CommandButton2_Click() MsgBox K1 MsgBox K2 MsgBox K3 ''aca me aparecen vacias las variables k1 k2 k3 End...
Ha respondido en y en 1 temas más

La propiedad RowSource me muestra todos los datos de la tabla

Rowsource no te sirve aunque hay opciones como te muestro en esta imagen, la macro solo lee la fila de los encabezados y los pone en el listbox y esta es la macro Private Sub UserForm_Initialize() COL = Range("B2").CurrentRegion.Columns.Count MATRIZ...
Ha respondido en y en 1 temas más

Pierdo el valor de mis variables

Porque las variables solo serán validas (por default son variables privadas) dentro de la programación del botón, si esas variables las quieres usar en otros botones te las mostrara vacías, puedes declarar las variables como publicas para que así...

Educación

  • UANL
    Ing. Industrial y Admon