Thema Datum  Von Nutzer Rating
Antwort
Rot Kopieren in anderes Tabellenblatt
12.10.2010 13:29:58 Steffi
NotSolved
12.10.2010 13:39:44 Severus
NotSolved
12.10.2010 16:04:58 Steffi
NotSolved
12.10.2010 16:41:57 Severus
NotSolved
13.10.2010 07:12:16 Steffi
NotSolved

Ansicht des Beitrags:
Von:
Steffi
Datum:
12.10.2010 13:29:58
Views:
1453
Rating: Antwort:
  Ja
Thema:
Kopieren in anderes Tabellenblatt
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!

Ihre Antwort
  • 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: Name: Email:



  • 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
Rot Kopieren in anderes Tabellenblatt
12.10.2010 13:29:58 Steffi
NotSolved
12.10.2010 13:39:44 Severus
NotSolved
12.10.2010 16:04:58 Steffi
NotSolved
12.10.2010 16:41:57 Severus
NotSolved
13.10.2010 07:12:16 Steffi
NotSolved