Notifications
Clear all

Variável global como criar e inicializar ?

4 Posts
2 Usuários
0 Reactions
553 Visualizações
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Amigos confesso, que não estou conseguindo criar e inicializar uma variável global.

Coloquei a variável col acima de todas as funções, dá erro

Qual o procedimento que se deve realizar para criação desta variável

Tenho a seguinte estrutura

Dim col As Integer
col = 2 'NÃO INICIALIZA

Private Sub CommandButton1_Click()
             CalculaHorasPorDia objPlanilha.Name, i
End Sub

Sub CriaHorasTrabalhadas(col As Integer)
End Sub

Sub CalculaHorasPorDia(nomePlanilha As String, ByVal i As Integer)

      col = 10 'DESEJO MUDAR O VALOR DA VARIÁVEL GLOBAL
      CriaHorasTrabalhadas(col)
  
End Sub

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 13/09/2016 10:16 am
(@mprudencio)
Posts: 2749
Famed Member
 

Tenta assim

Private Col as integer

Sub teste ()

Col = 2

End Sub

Marcelo Prudencio
Microsoft Excel Brasil no Facebook

"Começar já é a metade do caminho."
Autor Desconhecido

Simplifica que simples fica.
Nicole Tomazella.

"O Simples é Sempre Melhor Que o Complicado"
Jorge Paulo Lemann.

 
Postado : 13/09/2016 10:22 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Amigo, voltei aqui para informar que havia feito isto, agorinha de pouco e que havia funcionado kkkkkk, mas você chegou primeiro kkkkkkkkkk

Vou agradecer

Obrigado

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 13/09/2016 10:47 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Para Variaveis Globais, temos de Declara-las como "Public" e não Private.

Public Col AS Integer - estamos declarando somente a Variável Col como Publica podendo ser utilizada em qualquer rotina.

Para definirmos um "VALOR" fixo e deixa-lo como Public (Global) neste caso o correto seria Declara-lo como uma "Constante", ficando :
Public Const col = 2

Lembrando que como foi atribuido um valor a Constante "Col", este não poderá ser alterado no decorrer da Rotina em que será utilizada, ou seja será sempre "2"

[]s

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 13/09/2016 10:49 am