Visual Basic para Aplicaciones - Consulta paso de variables

Life is soft - evento anual de software empresarial
   
Vista:

Consulta paso de variables

Publicado por Esteban (4 intervenciones) el 20/04/2009 16:19:26
La declaracion de variables me tiene loco!
Agradezco de antemano al que llegó a leer hasta acá
Soy bien neofito en esto del VBA y consulto para ver si estoy haciendo esto bien.

La consulta es: dado este codigo

Sub mimacro()
Dim n, i As Integer
Dim salir As Boolean
Dim Pass, uss As String /*PROBÉ DEFINIENDO PASS COMO PUBLIC Y TAMPOCO*/

i = 1
salir = True
Range("A1").Select
Show FrmPass /* Aca me muestra el formulario.. (ESTA BIEN ESTO?).. y pasa a (2) EN private ButtonIngreso_Click() */

While salir And Worksheets(1).Cells(i, 1).Value <> "fin"
If Worksheets(1).Cells(i, 1).Value = Pass Then /*(3) ACA PASS LLEGA VACIO*/

MsgBox "ACCESO CONCEDIDO", vbOKOnly + vbInformation
Desproteje
salir = False
Else
i = i + 1
End If
Wend
If salir Then
MsgBox "ACCESO DENEGADO", vbOKOnly + vbInformation
End If
End Sub

Sub Desproteje()
ActiveSheet.Unprotect (1)
MsgBox "Hoja Desprotegida", vbOKOnly + vbInformation
End Sub

/* (2) este es el codigo del form ACA CARGA LOS VALORES DE PASS Y USS BIEN DESDE EL FORM*/

Private ButtonIngreso_Click()
uss = TBUsuario.Text
Pass = TBPassword.Text /* ACA CARGA BIEN EL VALOR DEL PASS PERO EN (3) (ARRIBA)*/
Unload Me
End Sub

QUE TENGO QUE HACER PARA PASAR BIEN LAS VARIABLES ?
GRACIAS DE NUEVO!
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de JuanC

RE:Consulta paso de variables

Publicado por JuanC (431 intervenciones) el 21/04/2009 17:08:37
debés declarar como públicas pero en un módulo, no dentro del formulario

Public Pass As String
Public uss As String

una cosa, por lo que veo usás los comentarios de C /* */
y también declarás
Dim n, i As Integer

en ese caso no declara dos Integer sino un Variant y un Integer
debe ser así
Dim n As Integer, i As Integer
o en una forma más corta
Dim n%, i%

Saludos desde Baires, JuanC
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Consulta paso de variables

Publicado por Esteban (4 intervenciones) el 21/04/2009 19:49:20
Mil Gracias JuanC !
Asi anduvo
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar