calvuch

Ok utiliza Sub renombrar() Dim hoja As Variant For Each hoja In ThisWorkbook.Sheets hoja.Name = mid(hoja.Range("A1").Value,1,10) Next hoja End Sub esto tomara solo los 10 primeros caracterres de lo que exista en celda A1, si necesitas mas o menos...

Tu script recorre los datos solo hasta que encuentre una celda vacía. Para incorporar datos al combo, es necesario 1. conocer el numero de registros a añadir o bien recorrer rodas las filas hasta que encuentre una palabra calve que le diga al bucle...

Ok. Veamos... ¿estas haciendo esto diercto en la hoja de calculo o sobre un formulario de usuario? ¿La imagen de que hablas que tipo de imagen es? (Icono, jpg, etc) ¿Cómo estas mostrando la imagen?

Excel indica: "La fuente de la lista debe ser una lista delimitada o una referencia a una fila o columna "individual". es decir NO se puede a menos que: concatenes el contenido de las celdas que te interesan en otra celda y esa utilziarla en cuador...

Lo que planteas esta a mi alcance salvo: "Si es posible cuando un dato se repita lo coloque una sola ves en la columna A y en la B coloque los nombres de las hojas que lo contienen." Ahora, indicas que el rango B13 a la B17 es igual en todas las...

A ver en una nueva hoja... ( Hoja4), deseas tomar los datos de la hoja1 y comparar con los que existen en hoja3 y colocar confirmados y no confirmados en ella... ok y si lo ves detenidamente, eso no es equivalente a "Marcar" en la hoja1 a todos los...

Veamos, no me quedo muy claro el tema. Hoja1 ColA =valor hoja1ColB= ?? Hoja2 ColA="=Hoja1!A1/1000000" ¿En Hoja3 y hoja4 deseas los mismos valores? Indica : ¿Hay una forma de que al cargar los valores en Col A l de que hoja? ¿La hoja 1? Por que si...

Pon un botón y ponle este código: Private Sub Command1_Click() Dim i As Integer For i = 0 To List1.ListCount - 1 List3. AddItem List1. List(i) - List2. List(i) DoEvents Next MsgBox "Terminado" End Sub

Cuando acrgas el form, se activa de inmediato el evento change del macro, lo que puedes hacer es declarar una variable del tipo bolean (public) y en el evento load del form le pasas el valor a true en el macro del combo pon esto: Private Sub...

Te dejo un ejemplo que puedes adaptar Option Explicit Dim f As Boolean Private Sub Command1_Click() If f = True Then MsgBox List1 f = False End If End Sub Private Sub Form_Load() Dim i As Integer For i = 1 To 10 List1.AddItem i Next End Sub Private...