Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
Escala de trabalho,...
 
Notifications
Clear all

Escala de trabalho, substituiçäo de valores

 
2024 - VBA & Macros
Post Recente por Bia2014 11 anos atrás
7 Posts
3 Usuários
0 Reactions
1,569 Visualizações
RSS
 Bia2014
(@bia2014)
Posts: 4
Active Member
Topic starter
 

Boa tarde, pessoal. Sou iniciante em VBA e gostaria de tirar uma dúvida. Estou fazendo uma escala de trabalho com essa disposição:

Turno 1 | Turno 2 | Turno 3 | Turno 4 | Turno 5

Turno 2 | Turno 3 | Turno 4 | Turno 5 | Turno 1

Turno 3 | Turno 4 | Turno 5 | Turno 1 | Turno 2

Turno 4 | Turno 5 | Turno 1 | Turno 2 | Turno 3

Turno 5 | Turno 1 | Turno 2 | Turno 3 | Turno 4

Sendo que esse ciclo se repete até o fim do mês e eu tenho um form que pega os dados de quem é o funcionário e a ordem de cada turno. A minha dúvida é de como substituir automaticamente todos o "Turno 1" por "Fulano", sem que o "Turno" perca seu valor para que o usuário insira sempre o primeiro turno e ele atualize o restante sozinho.

Alguém tem alguma dica? Obrigada.

 
Postado : 18/03/2014 11:21 am
 gtsalikis
(@gtsalikis)
Posts: 2373
Noble Member
 

Não ficou muito claro.

Esses Turnos estão no formulário, ou na planilha?

Um modelo COMPACTADO ajudaria.

 
Postado : 18/03/2014 12:25 pm
 Bia2014
(@bia2014)
Posts: 4
Active Member
Topic starter
 

Na planilha, no formulário eu só pego o nome do "Fulano" que vai substituir. Não estou com ela agora, mas assim que chegar rm casa eu envio. Bom, por enquanto outra dúvida, tem como criar via codigo uma lista sequencial?

 
Postado : 18/03/2014 12:34 pm
 gtsalikis
(@gtsalikis)
Posts: 2373
Noble Member
 

Bom, se vc for substituir na planilha, supondo que todos os "Turnos estejam em "A1:E10", seria algo assim

For each cell in range("A1:E10")

If cell.value = "Turno 1" then cell.value = "Fulano"

Next cell

Sobre a lista sequencial, tem como fazer, depende do que vc quer.

Aqui tem um exemplo para código alfanumérico:

viewtopic.php?f=23&t=10810

Se vc usar a pesquisa do fórum vai encontrar outros, com data, sem data...

 
Postado : 18/03/2014 12:40 pm
 Bia2014
(@bia2014)
Posts: 4
Active Member
Topic starter
 

Sim, pensei na substituição, mas agora olhando por outro ângulo, talvez funcione. Vou testar e retorno aqui. Obrigada pela atenção, vou procurar melhor no forum sobre a sequencia.

 
Postado : 18/03/2014 1:04 pm
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa noite Bia

Movi teu tópico para a sala VBA & Macros, pois aqui não é para postagem de duvidas, apenas dicas e macetes.

No início vou deixar mostrando o tópoco nos 2 fóruns para você se localizar.

At.te

 
Postado : 19/03/2014 7:25 pm
 Bia2014
(@bia2014)
Posts: 4
Active Member
Topic starter
 

Realmente. Percebi que tinha postado errado, mas como não me localizei direito acabei deixando nessa área.
Problema resolvido. Obrigada a todos!

 
Postado : 20/03/2014 10:07 am
Forum Jump:
  Tópico Anterior
Próximo Tópico