Vídeo recomendado
https://youtu.be/diWPPPhW-9E
https://youtu.be/diWPPPhW-9E
Pesquisa resultou em 4 ocorrências
- Dom Mai 24, 2020 8:56 pm
- Fórum: VBA Básico
- Tópico: Variar dinamicamente o UserForm dentro de uma rotina de repetição
- Respostas: 5
- Exibições: 3689
Re: Variar dinamicamente o UserForm dentro de uma rotina de repetição
Desculpa, mais não consegui entender sua resposta. O exemplo que mostrei é básico, só trocar a cor das fontes dos CommandButton dentro de um "For", não conseguir aplicar a sua resposta.
- Dom Mai 24, 2020 11:54 am
- Fórum: VBA Básico
- Tópico: Concatenar importação de arquivo Texto (*txt) | Arquivo com Quebras | RESOLVIDO |
- Respostas: 2
- Exibições: 2559
Re: Concatenar importação de arquivo Texto (*txt) | Arquivo com Quebras
Não sei se entendi bem. Você tem um arquivo .txt com 3 quebras de linha, você quer separar esses dados em 3 linhas. Se for isso o código tem 2 erros. Segue o código ajustado. Sub ArquivoTXT() Dim Arquivo As String Dim Linha As String Dim LinhaCompleta As String Dim i As Long Arquivo = Application.Ge...
- Dom Mai 24, 2020 10:46 am
- Fórum: VBA Básico
- Tópico: Variar dinamicamente o UserForm dentro de uma rotina de repetição
- Respostas: 5
- Exibições: 3689
Re: Variar dinamicamente o UserForm dentro de uma rotina de repetição
Não e isso que estou precisando. Vou tentar exemplificar melhor Exemplo: tenho uma UserForm com 4 CommandButton. Acionando o CommandButon1 ele muda a cor da fonte dos demais. Private Sub CommandButton1_Click() UserForm1.CommandButton2.ForeColor = RGB(255, 0, 0) UserForm1.CommandButton3.ForeColor = R...
- Sáb Mai 23, 2020 10:04 am
- Fórum: VBA Básico
- Tópico: Variar dinamicamente o UserForm dentro de uma rotina de repetição
- Respostas: 5
- Exibições: 3689
Variar dinamicamente o UserForm dentro de uma rotina de repetição
Tenho uma rotina de repetição (For) comum para várias UserForms, onde "X" (UserFormX) varia de acordo com "i". Como faço para variar o indice do Userform? For i = 1 To 10 If Sheets("Plan1").Range("J" & i) <> "" Then UserForm X .Commandbutton.Fore...