Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
Probleme mit der If Anweisung |
26.08.2016 12:21:47 |
Dideldadeldudelda |
|
|
|
26.08.2016 17:40:46 |
Holger |
|
|
|
28.08.2016 14:41:52 |
Dideldadeldudelda |
|
|
|
28.08.2016 18:02:20 |
Gast88230 |
|
|
Von:
Dideldadeldudelda |
Datum:
26.08.2016 12:21:47 |
Views:
1290 |
Rating:
|
Antwort:
|
Thema:
Probleme mit der If Anweisung |
Jeder der aufgeführten Mitarbeiter steht für ein Textfeld in dem etwas eingetragen werden soll. Ich möchte jedoch die Namen der Mitarbeiter in eine Zeile schreiben, und diese durch einen Schrägstrich abtrennen.
Mein problem ist, dass wenn ich auch nur einen Namen eintrage er die Querstriche immer hinten ran hängt. Kann mir jemand behilflich sein?
If Mitarbeiter1 <> "" Then
Range("L4") = "Name:" & " " & Mitarbeiter1
Else: Range("L4") = "Name:"
End If
If Mitarbeiter1 <> "" & Mitarbeiter2 <> "" Then
Range("L4") = "Name:" & " " & Mitarbeiter1 & " " & "/" & " " & Mitarbeiter2
Else: Range("L4") = "Name:" & " " & Mitarbeiter1
End If
If Mitarbeiter1 <> "" & Mitarbeiter2 <> "" & Mitarbeiter3 <> "" Then
Range("L4") = "Name:" & " " & Mitarbeiter1 & " " & "/" & " " & Mitarbeiter2 & " " & "/" & " " & Mitarbeiter3
Else: Range("L4") = "Name:" & " " & Mitarbeiter1 & " " & "/" & " " & Mitarbeiter2
End If
If Mitarbeiter1 <> "" & Mitarbeiter2 <> "" & Mitarbeiter3 <> "" & Mitarbeiter4 <> "" Then
Range("L4") = "Name:" & " " & Mitarbeiter1 & " " & "/" & " " & Mitarbeiter2 & " " & "/" & " " & Mitarbeiter3 & " " & "/" & " " & Mitarbeiter4
Else: Range("L4") = "Name:" & " " & Mitarbeiter1 & " " & "/" & " " & Mitarbeiter2 & " " & "/" & " " & Mitarbeiter3
End If
If Mitarbeiter1 <> "" & Mitarbeiter2 <> "" & Mitarbeiter3 <> "" & Mitarbeiter4 <> "" & Mitarbeiter5 <> "" Then
Range("L4") = "Name:" & " " & Mitarbeiter1 & " " & "/" & " " & Mitarbeiter2 & " " & "/" & " " & Mitarbeiter3 & "/" & " " & Mitarbeiter4 & "/" & " " & Mitarbeiter5
Else: Range("L4") = "Name:" & " " & Mitarbeiter1 & " " & "/" & " " & Mitarbeiter2 & " " & "/" & " " & Mitarbeiter3 & "/" & " " & Mitarbeiter4
End If
|
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
Probleme mit der If Anweisung |
26.08.2016 12:21:47 |
Dideldadeldudelda |
|
|
|
26.08.2016 17:40:46 |
Holger |
|
|
|
28.08.2016 14:41:52 |
Dideldadeldudelda |
|
|
|
28.08.2016 18:02:20 |
Gast88230 |
|
|