|
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
12.10.2010 13:29:58 |
Steffi |
|
|
 Aw:Kopieren in anderes Tabellenblatt |
12.10.2010 13:39:44 |
Severus |
|
|
|
12.10.2010 16:04:58 |
Steffi |
|
|
|
12.10.2010 16:41:57 |
Severus |
|
|
|
13.10.2010 07:12:16 |
Steffi |
|
|
Von:
Severus |
Datum:
12.10.2010 13:39:44 |
Views:
761 |
Rating:
|
Antwort:
|
Thema:
Aw:Kopieren in anderes Tabellenblatt |
Steffi schrieb am 12.10.2010 13:29:58:
Hallo zusammen,
habe momentan ein Tabelle gegeben, mit 8 Spalten. Sortiert ist das Ganze nach Kundennummern.
Wenn ich eine Kundennummer eingebe in meine InputBox und anschließend auf den Button "Ja" klicke, sollen nur die Spalten 2 und 8 in das zweiteTabellenblatt übernommen werden.
Hier meine bisherige Programmierung:
Sub finden()
Sheets("Übersicht").Select
KundenNummer = InputBox("Bitte geben Sie die Kundenummer ein")
Cells.Find(KundenNummer).Activate
ActiveCell.Offset(0, 1).Select
FIRMA = Selection
ActiveCell.Offset(0, 6).Select
AnsprechPartner = Selection
ActiveCell.Offset(0, -3).Select
ListenPreis = Selection
RetVal = MsgBox("AnsprechPartner ist " & vbTab & _
AnsprechPartner _
& vbCrLf & "von der Firma " & vbTab & vbTab & FIRMA _
& vbCrLf & "zu zahlen sind " & vbTab & vbTab & _
Format(ListenPreis, "0.00") & " €" _
, vbYesNo, "Wollen Sie einen Brief schreiben?")
If RetVal = vbYes Then Call Test
End Sub
Das heißt jetzt fehlt mir noch die Prozedur Sub Test (), die nach der Auswahl irgendeiner Kundennummer immer die Werte aus Spalte 2 und 8 in das zweite Tabellenblatt übernimmt, am Besten ohne Formatierung!
Danke!
Wohin im "zweiten Tabellenblatt" und wie jheißt es oder wie ist sein Index? Tatsächlich "2"?
Severus |
- 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
|
|
12.10.2010 13:29:58 |
Steffi |
|
|
Aw:Kopieren in anderes Tabellenblatt |
12.10.2010 13:39:44 |
Severus |
|
|
|
12.10.2010 16:04:58 |
Steffi |
|
|
|
12.10.2010 16:41:57 |
Severus |
|
|
|
13.10.2010 07:12:16 |
Steffi |
|
|