Luis Mondelo

Después de identificar la celda donde irá el link, posiciónate en ella y ejecuta estas líneas de código: fila = r + 2 columna = 5 sitio = Cells(r + 2, 5).Address ActiveSheet.Hyperlinks.Add anchor:=ActiveCell, Address:="", SubAddress:="base" & "!" &...

Como la primera la hice yo, también te contesto a esta: Sub copiado() Range("a13:b" & Range("a65000").End(xlUp).Row).Copy Sheets("hoja2").Cells(1, 1).pastespecial paste:=xlvalues Range("g13:i" & Range("g65000").End(xlUp).Row).Copy...

Creo que con este ejemplo lo podrás hacer: Sub copiado() Range("q5"). Copy Range("q6"). PasteSpecial xlPasteAll End Sub recuerda finalizar y puntuar la consulta

Entiendo que quieres vincular esos dos nuevos combos igual que hiciste con el combobox2. Entonces tienes que repetir el proceso que hiciste con el anterior: Private Sub ComboBox1_Change() ComboBox3.Clear Sheets("Datos vehículos").Select columna =...

Te mando mi solución. Esta macro te creará un txt de la hoja2 y lo dejará grabado en tu directorio predeterminado. El nombre con el que lo graba es "documento" (lo puedes cambiar) Sub crear_txt() milibro = ActiveWorkbook.Name Workbooks.Add otro =...

Te mando mi solución. Esta macro te copiará esa columna a la hoja2 desde A1 hacia abajo y solo los valores. Sub copiado() Range("b8:b" & Range("b65000").End(xlUp).Row).Copy Sheets("hoja2").Cells(1, 1).PasteSpecial Paste:=xlValues End Sub recuerda...

Si lo quieres hacer con vba esta sería la solución: Imaginemos que tenemos ese dato ne la celda A1. valor = mid(range("a1").value,5,2) Con esta sentencia estamos guardando en la variable valor la extracción 05 Recuerda finalizar y puntuar

Te mando este ejemplo: Sub datos() nombre = InputBox("inserte nombre") If nombre = "" Then Exit Sub fecha = InputBox("inserte fecha dd/mm/yyyy") If Not IsDate(fecha) Or fecha = "" Then Exit Sub grupo = InputBox("inserte grupo") If grupo = "" Then...

Claro que se puedo pero para poder configurarlo mejor necesito el archivo y te lo dejo preparado. [email protected] (Recuerda identificarte en el mail con el enunciado de la pregunta de todoexpertos)

Te mando una idea. Con esta macro llenaremos el textbox1 con los datos que seleccionemos del combobox y lo irá concatenando. Private Sub ComboBox1_Click() TextBox1.Value = TextBox1.Value & ComboBox1.Value End Sub