kelrock

La formula Redondear(A1;2), ¿la estas poniendo en la celda A1? Si ponemos una formula en una celda, haciendo referencia a si misma, creamos la referencia circular que te sale en el mensaje. Una opción para limitar los decimales sería hacerlo mediante...

A ver si lo he comprendido bien, prueba el siguiente código: Sub Duplicando_Hoja() Dim Fecha as string Fecha = Range("af13").Value Application.ScreenUpdating = False Sheets("carga_man").Select Sheets("carga_man").Copy Cells.Select Selection.Copy...

Prueba lo siguiente: Sub recortando() Dim Valor As String Range("a1").Select Valor = Mid(ActiveCell.Value, 1, 4) ActiveCell = Valor End Sub Con esta macro VbA coge el valor de la celda A1, y los substituye por los caracteres desde el primero hasta el...

No se si lo he entendido bien... :) ¿Te servirían las etiquetas? Me explico: var = 0 for i = 1 to h if cells(i,3)=4 then var=var+1 end if if var > 10 then ?????? If (condición para que se salte el next i) Then GoTo Saltar next i Saltar: ¿Te refieres...

Se me ocurre una manera, pero no se si es lo que buscas. Crea el botón en un Formulario, y al formulario le pones (en el menu de propiedades) el ShowModal como False. De esta manera podrás tener el botón siempre visible, y poder ir moviéndote por las...

Si, puede hacer referencia a una celda o a una formula que de un numero, a medida que el numero de la celda o formula cambia, la columna del BuscarV también lo hará.

No se si me ha quedado muy clara la explicación, pero prueba este código: Option Explicit Sub Macro1() Dim i As String Sheets("Hoja1").Select Range("a1").Select Selection.End(xlDown).Select i = ActiveCell.Value Selection.Copy Sheets("Hoja2").Select...

A ver si esto te sirve: En la programación del botón "continuar" añádele esto (yo lo haría al principio, que fuera lo primero que ejecute con el botón): If OptionButton1 = Empty And OptionButton2 = Empty Then MsgBox "selecciona una opción" Exit Sub...

Solo se me ocurre una cosa, no se si la has probado ya, añadirle al shell la ruta del archivo que quieres abrir, me explico. Tu shell: Call Shell("C:\Archivos de programa\Microsoft Office\Office\excel.exe", vbNormalFocus) pero se le puede añadir el...

Si he entendido bien la pregunta, pon esta fórmula en la celda de la columna L (donde debe aparecerte la fecha del vencimiento). SI(A2="";"";SI(G2="G1";B2+30;SI(G2="G2";B2+60;SI(G2="G3";B2+90;B2)))) Está pensada siendo: * A numero factura * B fecha...