Einfach in \AllNames den aktuellen Namen mit den Namen in der Liste vergleichen und dann den Font anpassen. Das sind zwei kleine Änderungen im Code:
Code:
\RequirePackage{filecontents}% ACHTUNG Meine-Adressen.adr wird überschrieben!!!
% Ausschnitt aus Beispieladressdatei aus der KOMA-Script-Anleitung geklaut:
\begin{filecontents*}{Meine-Adressen.adr}
\adrchar{E}
\adrentry{Engel}{Gabriel}
{Wolke 3\\12345 Himmelreich}
{000\,01\,02\,03}{}{}{Erzengel}
{GABRIEL}
\adrentry{Engel}{Michael}
{Wolke 3a\\12345 Himmelreich}
{000\,01\,02\,04}{}{}{Erzengel}
{MICHAEL}
\adrentry{Engel}{Raphael}
{Wolke 3b\\12345 Himmelreich}
{000\,01\,02\,05}{}{}{Erzengel}
{RAPHAEL}
\end{filecontents*}
\documentclass[DIN, pagenumber=false, parskip=half,%
fromalign=right, fromphone=true,%
fromemail=true, fromurl=false,%
fromlogo=true, fromrule=afteraddress]{scrlttr2}
\usepackage[latin1]{inputenc}
\usepackage[T1]{fontenc}
\usepackage[ngerman]{babel}
\usepackage{blindtext}% nur zu Demo-Zwecken
\begin{document}
\makeatletter
\newcommand*{\AllNames}{}
\begingroup
\renewcommand*{\addrentry}[9]{%
\g@addto@macro\AllNames{%
\ifstr{\CurrentName}{#1 #2}{\textbf{#1 #2}}{#1 #2}\\}%
}
\input{Meine-Adressen.adr}
\endgroup
\makeatother
\newcommand*{\CurrentName}{}
\renewcommand\addrentry[9]{%
\begin{letter}{#1 #2\\#3}% letter-Umgebung verwenden!
\renewcommand*{\CurrentName}{#1 #2}%
\opening{Hallo #2,}% Anrede immer mit \opening!
\blindtext
\closing{Stephan}% Schlussgruß immer mit \closing
\cc{\AllNames}% Verteiler mit \cc!
\end{letter}
}
\input{Meine-Adressen.adr}
\end{document}
\ifstr ist ebenfalls in der KOMA-Script-Anleitung oder im KOMA-ScriptBuch dokumentiert.
Lesezeichen