Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

Excel-Adressdatei für Serienbrief anpassen - doppelte Einträge verschieben

Frage Microsoft Microsoft Office

Mitglied: steffen78

steffen78 (Level 1) - Jetzt verbinden

22.01.2009, aktualisiert 07:57 Uhr, 4663 Aufrufe, 1 Kommentar

Ich habe folgendes Problem bei der Erstellung einer Serienbrief-Adressdatei:

In meiner Excel Tabelle habe ich in jeder Zeile Namen von Kunden, und dahinter verschiedene Zeiträume stehen.

z.B.:

Kunde A von bis
Kunde B von bis

Jetzt kommt allerdings der Kunde A 2x untereinander vor.

Kunde A von bis
Kunde A von bis
Kunde B.............

Das ein Kunde doppelt in der Liste steht kommt nicht regelmäßig vor.
Damit ich für den Kunden A nur einen Brief mit allen Zeiträumen verschicken kann, muss ich die Zeiträume alle hintereinander in Spalten bekommen.

Kann mir jemand weiterhelfen, und sagen ob das geht, und vor allem wie?

Vielen Dank
Mitglied: godlie
22.01.2009 um 13:53 Uhr
Hallo das ganze lässt sich durch ein Makro lösen, für den Fall das Kunde A unter Kunde A vorkommt.

01.
Sub finder() 
02.
Dim ws As Worksheet 
03.
For rwNumber = 3 To 5 
04.
'For clNumber = 1 To 50 
05.
' Cell can be obtained through 
06.
If (Worksheets(1).Cells(rwNumber, 1).Value = Worksheets(1).Cells(rwNumber - 1, 1)) Then 
07.
    MsgBox (Worksheets(1).Cells(rwNumber - 1, 2).Value) 
08.
    Cells(rwNumber - 1, 4).Value = Cells(rwNumber, 2).Value 
09.
    Cells(rwNumber - 1, 5).Value = Cells(rwNumber, 3).Value 
10.
    Rows(rwNumber).Delete 
11.
End If 
12.
 
13.
'Next clNumber 
14.
Next rwNumber 
15.
End Sub
Achja vorsicht:
Dieses script löscht die doppelte reihe heraus und überträgt die Zeiten nach oben.
Hm ich glaub ich sollt mal Marko Schulungen geben
Bitte warten ..
Ähnliche Inhalte
Batch & Shell
gelöst Dateien zusammenführen inkl. finden von doppelten Einträgen (3)

Frage von miczar zum Thema Batch & Shell ...

Microsoft Office
gelöst Serienbrief - alternative Dateiformate (3)

Frage von Nagus zum Thema Microsoft Office ...

Windows 10
gelöst Kontextmenü unter Windows 10 anpassen (6)

Frage von honeybee zum Thema Windows 10 ...

Neue Wissensbeiträge
Ubuntu

Ubuntu 17.10 steht zum Download bereit

(3)

Information von Frank zum Thema Ubuntu ...

Datenschutz

Autofahrer-Pranger - Bewertungsportal illegal

(8)

Information von BassFishFox zum Thema Datenschutz ...

Windows 10

Neues Win10 Funktionsupdate verbuggt RemoteApp

(8)

Information von thomasreischer zum Thema Windows 10 ...

Microsoft

Die neuen RSAT-Tools für Win10 1709 sind da

(2)

Information von DerWoWusste zum Thema Microsoft ...

Heiß diskutierte Inhalte
Windows 10
Seekrank bei Windows 10 (18)

Frage von zauberer123 zum Thema Windows 10 ...

Windows 10
Windows 10 Fall Creators Update Fehler (14)

Frage von ZeroCool23 zum Thema Windows 10 ...

Router & Routing
gelöst Getrenntes Routing bei VoIP und Daten (12)

Frage von Hobbystern zum Thema Router & Routing ...