paramisolo

Ya te lo he dicho en otra consulta para lo mismo.

Pues en base a esa plantilla crear la tuya, no sé ni como es el archivo, y evidentemente lo que te muestran es la forma de hacerlo pero no te van a crear el tuyo personalmente. Ponme un correo y te pediré que me lo envíes, pero tan solo te daré las...

En el TextBox6 pones Range("F9").Formula="=TextBox4.Value+TextBox5.Value" TextBox6.Value=Range("F9").Value End Sub La verdad es que todo el código debería de estar dentro del codigo del Private Sub CommandButton2_Click() Range("A9").FormulaR1C1 =...

Los ciclos no pueden evaluar diferentes condiciones (o una u otra) piensaló, el ciclo tiene que cumplir la condición impuesta en tu caso "mientras que la celda activa sea diferente al asterisco pero si también le pones que sea blanco en algún momento...

Lo que necesitas si se puede hacer por medio de una macro, pero tienes que tener en cuenta: Necesitaremos una columna libre para utulizarla para realizar la concatenación (unión) Vamos a suponer que la columna A contiene los dígitos constantes y la B...

Si tienes errores la macro quedaría así: Dim fila As String fila=InputBox("Ingrese Nº fila a eliminar") If fila <>"" or fila>8 Then Rows("" & fila & ":" & fila & "").Select Selection.ClearContents End If End Sub >Un saludo >Julio

Primero tendremos que sacar la lista de las ciudades en una rango y en la celda de al lado que te cuente las veces que se repiten. Para sacar las ciudades pones esta macro: Suponiendo que tu columna de datos sea la A y la B donde vamos a trasladar el...

El codigo para el boton insertar sería este: Private Sub CommandButton3_Click() Range("C9").Select Selection.EntireRow.Insert If TextBox1<>"" Then Range("C9").FormulaR1C1 = TextBox1 TextBox1=Empty Else MsgBox "error inserte el campo que falta" Exit...

Vale he entendido lo que quieres hacer, donde está tu problema hay alguna parte que no sabes hacer, aclarame y si puedo te ayudo >Un saludo >Julio

Vaya consultita, 3 en una bueno pues para las 2 primeras he trabajado yo, y esta es la macro personalizada: Sub Guardar_Varios_Libros() Dim mi_nombre As String Dim archivo As String Dim nombre As String Dim nuevoarchivo As String Dim libroX As String...