Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Macros en EXCEL (https://www.clubdelphi.com/foros/showthread.php?t=65991)

ledesma78 26-01-2010 16:52:59

Macros en EXCEL
 
Hola que tal, tengo una duda de como hacer lo siguiente en un macro, las dudas las escribo con letras rojas, ojala y me puedan ayudar

Código:

Public Sub InsertarCaracter()
Dim i As Integer
 
Dim PrimeraFila As Integer
Dim UltimaFila As Integer
Dim Columa As Integer
 
PrimeraFila = 1
UltimaFila = 4 'quiero saber como puedo hacer que esta variable no contenga un valor estatico _
si no que sea "n" numero. Yo habia pensado que UltimaFila sea un valor de una celda _
y el de la celda estarlo cambiando y automaticamente se cambie este valor, pero no se _
tambien como hacer eso(solo tengo la idea), O si ven una mejor solucion diganme como porfa, gracias

Columna = 1 'Columna A
 
For i = PrimeraFila To UltimaFila
' No pongas el apostrofe, pon tilde y un espacio
' ya que en excel el apostrofe significa que ingresaste un texto
Cells(PrimeraFila + i, Columna) = "´" & Cells(PrimeraFila + i, Columna)
Next i
 
End Sub


delphi.com.ar 26-01-2010 17:37:43

Que no sea estático significa que sea un número aleatorio?...

Puedes utilizar la función "RND" (Random) pero recomiendo anteriormente inicializar la semilla del algoritmo con algun valor cambiante:

Código:

  Randomize Timer

  ...
  UltimaFila = cint(rnd * MAX_FILAS)



La franja horaria es GMT +2. Ahora son las 10:20:42.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi