• Revista PROGRAMAR: Já está disponível a edição #53 da revista programar. Faz já o download aqui!

ruismb

Ciclos em excel

3 mensagens neste tópico

Boa tarde, tenho um problema em excel que gostaria de saber se é possível resolver.

Será possivel criar um ciclo que me seleccione um conjunto de folhas como o exemplo que se segue.

Range("B3").Select

  ActiveCell.FormulaR1C1 = "='Documento1'!R7C15"

  Range("B4").Select

  ActiveCell.FormulaR1C1 = "='Documento2'!R7C15"

    Range("B5").Select

    ActiveCell.FormulaR1C1 = "='Documento3'!R7C15"

    Range("B6").Select

    ActiveCell.FormulaR1C1 = "='Documento4'!R7C15"

    Range("B7").Select

    ActiveCell.FormulaR1C1 = "='Documento5'!R7C15"

    Range("B8").Select

    ActiveCell.FormulaR1C1 = "='Documento7'!R7C15"

    Range("B9").Select

    ActiveCell.FormulaR1C1 = "='Documento8'!R7C15"

    Range("B10").Select

    ActiveCell.FormulaR1C1 = "='Documento9'!R7C15"

Range("B11").Select

Em que Documento1, Documento2 .... são as folhas.

Antecipadamente grato,

Rui Barbosa

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Olá,

Algo do género deve dar (exemplo):

Dim x As Integer

For x = 1 To 10
    Range("b" & (x + 3)).FormulaR1C1 = "='Documento" & x & "'!R7C15"
Next

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Bom dia ... agradeço a atenção e funciona mais ou menos como queria, contudo não funciona muito bem se a folha que está a percorrer no ciclo não existir, como conseguiria ultrapassar isso?

Cumps,

Rui Barbosa

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!


Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.


Entrar Agora