calvuch

Esa función devuelve el valor que se encuentre a la derecha del valor buscado, tantas columnas como indiques en su argumento... en tu formula veo que como rango de búsqueda pones solo una columna C6:C8 por lo cual falla... la tabla de búsqueda debe...

Public Sub export_txt() ' exporta rango seleccionado a archivo txt Dim obj_FSO As Object Dim archivo As Object Dim rango As Range Dim r As Range Dim Nombre As String Dim filas As Long '4c7569735f50 Nombre = InputBox("indica nombre de archivo",...

al pasar por el select case categ1 = categ1 + List12.List(I) ¿Qué valor toma la variable categ1?... Puesto que al pasarlo al textfor6 lo pasas como string.

El script que indicas hace referencia a un campo de texto (me.txtUsuario) de un formulario... supongo que existe ese formulario en tu proyecto verdad?

La intentar la controlas manejando los sgtes valores: StartUpPosition ' indica el modo de posicionar el form el valor 0 indica que sera manualmente Así: Private Sub UserForm_Initialize() Me.StartUpPosition = 0 End Sub Al inicializar el formulario...

Veamos, lo que indicas es solo para aplicar un formato a la fecha, si deseas guardar ese dato en la bd, pues entonces debes asignar un espacio para ese valor, de lo contrario solo quedaría como un dato meramente informativo.

en ves de utilizar form1.show utiliza el metodo load asi inicializas la aplicacion desde un sub main ejemplo Private Sub Main() If App.PrevInstance = True Then MsgBox App.Title & " Ya esta en ejecución", vbCritical, App.Title End Else Load Form1 End...

Declara la variable en el modulo después de la linea option explicit Option explicit Algo así: Option Explicit Dim x As Boolean Private Sub CommandButton1_Click() If x = True Then MsgBox "tu mensaje", vbInformation: Exit Sub ' Tu procedimiento x =...

Así. Private Sub Command1_Click() Picture1.Picture = LoadPicture(Trim(Text1)) End Sub No olvides CERRAR la pregunta

Dices "en la colucna 2 abajo de la anerior " así según yo te quedarían escalonados 1 2 3 O qusiste decir "fila" ?