Sebas Torres

Haber si te sirve esta macro Sub Copiadatos() ' By Serresto Set H1 = Sheets("HOJA1") Set H2 = Sheets("HOJA2") Application.ScreenUpdating = False H1.Range("A1:G17").Copy: X = H1.Range("A1").RowHeight H2.Range("B2").PasteSpecial Paste:=xlPasteAll...

¿Me podrías comentar un poco que es lo que quieres hacer? Porque crear fórmulas y al agregar filas las fórmulas se actualicen es una función neutro de excel, es lo que lo hace tan practico... siempre y cuando agregues las filas por encima de las...

En esta línea If ListBox1.ListIndex <= 0 Then Exit sub dice que si la lista es menor o igual a cero se termine el proceso, probaste quitar esa linea para que te deje seguir ejecutando la macro? De lo contrario tendrías que buscar alguna otra macro...

Creo que es porque tienes 11 columnas y addItem sólo admite 10 columnas

Sinceramente no entiendo mucho tu código, pero si lo que quieres es moverte entre hojas con un click porque no simplemente pones un botón en cada hoja con una macro para que haga visible dicha hoja y oculte el resto? Ejemplo si tienes 3 hojas "Hoja1...

Podrias crear en el registro los nombres, platos y detalles tipo asi Y en base a eso poner consultas en base al nombre que te tire en unas celdas el plato y en otras el detalle. Ejemplo poner el nombre en A2 En B1 ( que seria el plato) escribes...

Podrias simplemente poner dentro del modulo de la hoja Private Sub Worksheet_SelectionChange(ByVal Target As Range) Range("G2").FormulaLocal = "=HOY()" End Sub es la funcion hoy, pero cada ves que hagas click sobre cualquier celda se va a actualizar...

¿No entendí bien el tema de donde sacas los datos y los códigos pero algo así es lo que tu quieres hacer? Al ingresar datos por segunda vez, ¿se corra 10 columnas para no sobre escribir? De ser esto lo que necesitas, te dejo el link de descarga de...

Con la siguiente macro si en el rango C1:C50 si encuentra en alguna celda que contenga Hola y Doce entonces pintal a celda de amarillo Sub BuscarPal() Dim xCel As Range Dim Pal, Pal2 As String Pal = "Hola" Pal = "*" & Pal & "*" Pal2 = "Doce" Pal2 =...

Pero en tu macro no estás aplicando ningún formato ... el formato que usa al insertar los datos lo tienes puesto en la columna G ve a formato, y selecciona el que te cumpla con tus necesidades