Toon posts:

VB+excel

Pagina: 1
Acties:
  • 47 views sinds 30-01-2008

Verwijderd

Topicstarter
Ik wil vanuit excel werkbladen mailen naar verschillende ontvangers. Op het werkblad zit een dropdown die per afdeling de juiste gegevens selecteerd.

Stukje van m'n code:
code:
1
2
Selection.Autofilter Field:=1 Criteria1:="Algemene Zaken"
ActiveWindow.SelectedSheets.PrintOut copies:=1

Deze code selecteert de gegevens van Alg. Zaken en print die apart af. Nu moet dit niet meer geprint worden, maar in een mailtje worden verstuurd.

Mijn code om dit te doen was:
code:
1
2
Selection.Autofilter Field:=1 Criteria1:="Algemene Zaken"
ActiveWindow.SelectedSheets.Sendmail recipients:="mailadres"

Dit blijkt niet te werken.
Wat welk werkt is ActiveWindows.Selectedsheets vervangen door ActiveWorkbook. Alleen nu wordt niet de selectie gemaild, maar het hele werkblad, wat dus niet de bedoeling is.

Wie het weet mag het zeggen.

Verwijderd

Topicstarter
Zijn er expressies waar "sendmail" niet in voor mag komen ofzo????

  • Skinny
  • Registratie: Januari 2000
  • Laatst online: 13-09 23:09

Skinny

DIRECT!

Op woensdag 20 februari 2002 13:19 schreef Destruction_Dimbo het volgende:
Zijn er expressies waar "sendmail" niet in voor mag komen ofzo????
Uit de help :
Deze methode verzendt de werkmap via het geïnstalleerde postsysteem.

Syntaxis

expressie.SendMail(Recipients, Subject, ReturnReceipt)

expressie Vereist. Een expressie die een Workbook-object als resultaat geeft.
Ja dus

SIZE does matter.
"You're go at throttle up!"


Verwijderd

Topicstarter
Ja zover was ik ook al gekomen.
Ben het nu maar anders aan het maken:
1 Afdeling selecteren
2 Informatie selecteren en kopieeren
3 Nieuw excel-blad aanmaken
4 Informatie plakke
5 Versturen via SendMail.

  • mbravenboer
  • Registratie: Januari 2000
  • Laatst online: 06-11-2025
Lijkt mij een dubbelpost...

[topic=417464/1/25]

Blog, Stratego/XT: Program Transformation, SDF: Syntax Definition, Nix: Software Deployment


Dit topic is gesloten.