angelcrisnor

Creo que esta fórmula es la que tendrías que poner en C1. =SI(B1<>0;A1/B1;1) En cuanto a que se ponga en rojo el porcentaje si no hay gasto y sí presupuesto, eso solo ocurrirá cuando el porcentaje sea CERO, por lo que tendrás que utilizar un FORMATO...

A ver qué te parece esta macro, donde le puedes poner a POR el valor que quieras. Sub Saca10alAzar() x = 5 Randomize For i = 1 To 10 Range("A" + Trim(Str(i))).Value = Int((x * Rnd()) + 1) Next End Sub

Creo que esta macro servirá para lo que pides. Si es así, por favor, finaliza la pregunta para poder atender a otras personas. Saludos Angel ++++++++++++++++++++++++++++++++++++++++++++++++++ Sub CopiaColumnaSinRepetir() HojaOrigen = ActiveSheet.Name...

Preguntas si se puede hacer. Sí, se puede hacer. ¿Lo vas a hacer muchas veces o solo una vez?. Si solo lo vas a hacer una vez, no tien mucha dificultad. Si es una tarea que vas a hacer muchas veces tal vez te interese hacer una macro. Pero vamos, que...

Todo se puede hacer, pero es mejor ir por partes. Mira a ver si te sirve la siguiente función. Es muy sencilla y lo único que hace es chequear si existe un fichero en la misma carpeta donde tienes tu hoja de cálculo, y devolver VERDADERO o FALSO...

Yo creo que no necesitas ninguna macro, sino que tu fórmula contemple el caso de que en la columna A no haya dato. Por ejemplo, si quieres que en la celda B1 se calcule =C1/A1 pero no quieres que te dé error cuando A1 esté vacío, puedes evitar el...

El problema es que la fecha hay que transformarla de formato string a formato fecha. Tienes que ponerlo así: Private Sub Workbook_Open() If Date > DateValue("24/04/2010") Then ...A... Else ...B... End If End Sub

Deberás usar dos macros, por ejemplo las siguientes. La primera se encarga simplemente de actualizar la hora actual en una celda de terminada, por ejemplo la A1, y llamar a la segunda. La segunda se encarga de llamar a la primera cada cierto tiempo....

Las dos formas más sencilals son las siguientes: a) Con una sola fórmula que anide varios SI =SI(t<5,1;"a";si(t<6,5;"b";.....)) b) Con un BURCARV(), debiendo en ese caso definir la tabla de búsqueda en 3 columnas. La primera es más sencilla y para...

Tal vez te sería más simple esto, que te hará lo mismo: Sub Macro2() Range("A9:A1672").Select Selection.Copy Windows("Resultados de macro aleatoria 3 piezas manual hasta 100 autom.xlsm"). _ Activate Sheets.Add After:=Sheets(Sheets.Count)...