La Asociación Deportiva y Cultural de Empleados de Ford España, S.L.

Contacto

images.ashx?id=93979af3ae6dfb6f57b04962469d0740

ADCEFE

De lunes a viernes
Avenida de la Folla, s/n. Almussafes (46440) Valencia
Tel. 697857688
asociacionempleadosford@gmail.com

Sub CrearArchivoYEnviarCorreo() Dim nombreArchivo As String Dim rutaArchivo As String Dim fso As Object, archivo As Object Dim wsSource As Worksheet, cell As Range ' Define la hoja donde se encuentra el nombre del archivo Set wsSource = ThisWorkbook.Sheets("NombreDeTuHoja") ' Reemplaza "NombreDeTuHoja" ' Recorre las celdas que contienen los nombres de archivo (ajusta el rango según tus necesidades) For Each cell In wsSource.Range("A1:A10") ' Ejemplo: Rango A1:A10 ' Obtener el nombre del archivo de la celda 'nombreArchivo = cell.Value ' Si el nombre está directamente en la celda 'cell' nombreArchivo = wsSource.Cells(cell.Row, "f").Value ' Si el nombre está en la columna "F" de la misma fila ' --- Resto del código (igual que el ejemplo anterior) --- rutaArchivo = "C:\ruta\" & nombreArchivo Set fso = CreateObject("Scripting.FileSystemObject") Set archivo = fso.CreateTextFile(rutaArchivo, True) ' True para sobrescribir si existe ' ... [Tu código para escribir datos en el archivo] ... archivo.Close Set archivo = Nothing Set fso = Nothing ' --- Parte del envío del correo --- Dim OutApp As Object, OutMail As Object Dim strTo As String, strSubject As String, strBody As String strTo = "correo_destinatario@example.com" strSubject = "Asunto del correo" strBody = "Este es el cuerpo del mensaje." Set OutApp = CreateObject("Outlook.Application") Set OutMail = OutApp.CreateItem(0) With OutMail .To = strTo .Subject = strSubject .Body = strBody .Attachments.Add rutaArchivo ' <- Usamos la variable rutaArchivo .Display ' O .Send para enviar directamente End With Set OutMail = Nothing Set OutApp = Nothing Next cell ' Pasa a la siguiente celda del rango Set wsSource = Nothing End Sub

Decarga nuestra App exclusiva

GOOGLE PLAY APP STORE

images.ashx?id=8d17b67e9007a9706a456c85bd127049

Contacta con nosotros

He leído y acepto la política de privacidad

Noticias

Todas nuestras novedades y eventos

14/05/2025 ALQUILER INSTALACIONES DEPORTIVAS (Piscina)

Hola:

¿Buscáis un plan cómodo, seguro y divertido para despedir el curso? Os invitamos a disfrutar de nuestra zona recreativa con piscina y amplias áreas verdes: el lugar perfecto para que invitados, amigos, grupos de trabajo, alumnado, profesorado y familias vivan una jornada inolvidable sin complicaciones organizativas.

Por qué os va a encantar

• Instalaciones completas al aire libre (piscina + zonas de juego y descanso).

• Socorristas titulados durante toda la jornada (11:00-19:00 h).

• Precio claro y asequible: 7 € por asistente; docentes gratis.

• Posibilidad de exclusividad si superáis las 200 personas.

• Proceso de reserva sencillo: bloquead fecha con un 30 % (15 días antes) y liquidáis el resto 48 h antes del evento.

Tarifas (IVA incluido)

• Acompañantes/invitados: 7 € por persona

• Socios: ¡gratis!

Cómo reservar

1. Consultad disponibilidad.

2. Bloquead la fecha con el 30 % del importe estimado.

3. Cerrad número de asistentes y abonad el resto 48 h antes.

Contactadnos y pedid visita o presupuesto sin compromiso:

Asociación de Empleados Ford España

asociacionempleadosford@gmail.com

Tlf.: 697 857 201 / 697 857 688

www.asociacionefe.com

VER DETALLE
13/01/2025 Clases JIU-JITSU
El jiu-jitsu o ju-jutsu (柔術 ''jūjutsu''^?, lit., ‘el arte suave’) es un arte marcial japonés clásico o koryū budō que abarca una variedad amplia de sistemas de combate modernos basados en la defensa «sin armas» de uno o más agresores tanto armados como desarmados

HORARIO
- Martes 14'30 a 15'30
- Jueves 14'30 a 15'30
Empiezan las clases

MÁS INFORMACIÓN , contacta con M.A Muñoz--600690526

Clases con COPAGO
VER DETALLE
09/01/2024 ¡¡¡NUEVOS RETOS, apúntate!!!!!

VER DETALLE
26/06/2023 INTRODUCCIÓN DE FAMILIARES EN EL CARNET DIGITAL
ADJUNTAMOS LAS INSTRUCCIÓNES PARA INCORPORAR A LOS FAMILIARES EN EL CARNET DIGITAL.

Familiares son:

Pareja/Cónyuge

Hijos

Padres/Madres Socio
VER DETALLE
03/03/2023 Mira como lo disfrutan estos días de vacaciones Paelleros/Barbacoa
Ya puedes disfrutar de tu tiempo libre haciendo una Paella o Barbacoa en nuestras instalaciones con familia o amigos. ( usa la app para reservar).
- Cumple con las normas de seguridad ( se han instalado varios extintores),
- Si quieres, utiliza la leña recogida.
- Recoge las cenizas cuando acabes, ayudanos a todos a mantener las instalaciones limpias.
- Tus "invitados"( todo personal no socio) tendrán que abonar 3€.
Con responsablilidad disfruta de las instalaciones.
VER DETALLE
VER DETALLE