Luis Mondelo

Necesitas tener estas líneas de código dentro del evento EXIT, AFTER_UPDATE o en un botón del formulario. (La hoja "datos" y el rango "a1:a..." están inventados. Recuerda PUNTUAR y FINALIZAR la consulta ... ... valor = textbox1 set busca =...

Si quieres mándame un pequeño ejemplo y te lo intento resolver: [email protected]

Sería algo así: Primero tienes que copiar esta macro en el objeto "hoja2", ya que es un evento, concretamente el evento change. Private Sub Worksheet_Change(ByVal Target As Range) On Error Resume Next foto = ActiveCell.Value tope = ActiveCell.Top izq...

Si lo que quieres es ocultar desde la columna F a la Y utiliza este código: Sub columnas() Columns("F:Y").Select Selection.EntireColumn.Hidden = True Range("A1").Select End Sub Para proteger una macro con contraseña tienes que hacer lo siguiente:...

Te recomiendo este código para mandar el archivo actual: (Claro está, para enviar nuestro actual archivo, ha tenido que ser grabado previamente en el disco duro). Tanto el destinatario, el asunto y el cuerpo lo puedes referenciar a alguna celda de...

Me voy a imaginar que la lista de nombres repetidos está en la columna A y empiezan desde la celda A2 (en a1 está le rótulo). La macro que te mando te hace una lista de nombres únicos y te la vincula a una validación en la celda C2. Puedes cambiar la...

Aquí tienes la macro que lo hace. Para poder ejecutarla situate, previamente, en el primer valor de tu columna. (En mi caso la palabra que busco es "casa") Recuerda finalizar y puntuar Sub busca() Do While ActiveCell.Value <> "" valor =...

Esta secuencia de código te lo hará. Tendrás que pegarla dentro de tu macro: En mi ejemplo he llamado acumulado a la pestaña donde guardas los datos y también he predispuesto que la fecha la guardaremos en la columna A de dicha pestaña. También me he...

Te propongo un ejemplo que espero sigas con atención: En A1 ponemos: 31/1/2012 En B1 ponemos: 9:23 En C1 ponemos: 1/2/2012 En D1 ponemos: 21:43 La fórmula la ponemos, por ejemplo, en E1 y sería la siguiente: =C1+D1-A1-B1 El resultado que te va a dar...

Se hace con el formato condicionan y en su modalidad de fórmula. Mis nombres de hojas son "uno" y "dos". El formato condicional lo tienes que implementar en ambas hojas: =Y(uno!$A2=uno!$B2;uno!$C2=uno!$A2;dos!$A2=dos!$B2;dos!$C2=dos!$A2) Recuerda...