SISTEMA DE MATRICULA Y CONSULTA DE CALIFICACIONES 1/2
HTML-код
- Опубликовано: 29 авг 2024
- imágenes en mega
mega.nz/file/O...
------------------------------------------------------------------------------------------------------------
minuto 30:04 validación de la celda
------------------------------------------------------------------------------------------------------------
With ws.Range("F19").Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:=opciones
.IgnoreBlank = True
.InCellDropdown = True
.ShowInput = True
.ShowError = True
End With
---------------------------------------------------------------------------------------------------------------
minuto 32:13 codigo para llamar la imagen sin foto.png
OJO: aqui usar el numero de rectangulo generado en su ejercicio
---------------------------------------------------------------------------------------------------------------
ActiveSheet.Shapes.Range(Array("Rectangle 139")).Select
With Selection.ShapeRange.Fill
.UserPicture "C:\SISTEMA MAT\FOTOS\sin foto.png"
End With
---------------------------------------------------------------------------------------------------------
minuto 33:20 cuadro de dialogo del
---------------------------------------------------------------------------------------------------------
With Application.FileDialog(msoFileDialogFilePicker)
.AllowMultiSelect = False
.Title = "Seleccionar imagen"
.Filters.Clear
.Filters.Add "Archivos de imagen", "*.png; *.jpg", 1
If .Show = -1 Then
ruta = .SelectedItems(1)
Else
Exit Sub
End If
End With
EXCELENTE VIDEO... Soy docente y me gustan mucho los proyectos en excel utilizando Visual Basic.
Gracias por tu comentario, si la verdad excel es una herramienta que si se explota al máximo tiene mucho que ofrecer
Buen sistema! Se podría considerar la opción para emitir un reporte de notas del alumno en pdf.
Claro que si amigo, en el segundo video