Preguntas esperando respuesta
Actividad pública reciente
Ha preguntado en el tema en
Programación
y en 1 temas más
Uso de listas y procedimientos en Scratch 2
Con anterioridad hice algunas preguntas en este foro, en relación a programar en VB de Excel. Ahora quiero aprender a programar en Scratch 2 y tengo el siguiente ejercicio, pero no se por donde empezar: En Scratch 2 debo desarrollar un programa que:...
Sin respuestas
Ha valorado "Excelente" la respuesta
El botón debe permitir ingresar todos los datos a la planilla
Te anexo la macro Private Sub CommandButton1_Click() 'Por.Dante Amor cad = "" If TextBox1 = "" Then cad = cad & "Nombres. " If TextBox2 = "" Then cad = cad & "Apellidos. " If ComboBox1 = "" Then cad = cad & "Zona. " If ComboBox2 = "" Then cad = cad &...
Ha valorado "Excelente" la respuesta
Cargar región y código cuidad según archivo adjunto
H o l a: Tienes que describir con ejemplos lo que necesitas.
Ha valorado "Excelente" la respuesta
Cargar desde otro libro excel datos en una base
H o l a: Te anexo la macro para cargar la zona Public h1, h2 ' Private Sub UserForm_Activate() 'Por.Dante Amor Set l1 = ThisWorkbook Set h1 = l1.Sheets(1) abierto = False archivo = "excel adjunto.xlsx" ruta = l1.Path & "\" For Each libro In Workbooks...
Ha valorado "Excelente" la respuesta
Userform para cargar una base de datos
H o l a: En un correo nueva envíame los archivos, en el asunto del corro escribe tu nombre de usuario: "Macontad" Sal u dos
Ha valorado "Excelente" la respuesta
Macro que solicite ingresar un rut y que arroje un mensaje que diga el rut ya fue ingresado
Te anexo el código Private Sub CommandButton1_Click() Set h1 = Sheets("Hoja1") Set b = h1.Columns("A").Find(TextBox1, lookat:=xlWhole) If Not b Is Nothing Then MsgBox "Ya existe ese RUT" Exit Sub End If ' u1 = h1.Range("A" & Rows.Count).End(xlUp).Row...
Ha valorado "Excelente" la respuesta
Macro que muestre un msgbox si es mayor de edad o no
Sub evaluarEdad() edad = InputBox("Ingrese edad") Select Case edad Case Is >= 18 MsgBox "Es mayor de edad", vbInformation, "AVISO" Case Else MsgBox "Es menor de edad", vbCritical, "AVISO" End Select End Sub Recuerda valorar saludos!!
Ha valorado "Excelente" la respuesta
Macro que permita ingresar la edad de una persona através de un inputbox con select case
No entendí que resultado saldrá cuando la edad es mayor o menor Te anexo el código para modifiques a tus necesidades Sub evaluarEdad() edad = InputBox("Ingrese edad") Select Case edad Case Is >= 18 Range("A1") = "Mayor de edad" Case Else Range("A1")...
Ha valorado "Excelente" la respuesta
Macro con funcion select anidada
Me comentas y valoras para finalizar!