Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

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
GELÖST

Werte aus einer Excel Tabelle in eine andere importieren.

Frage Microsoft Microsoft Office

Mitglied: Enoch23

Enoch23 (Level 1) - Jetzt verbinden

14.08.2014, aktualisiert 15.08.2014, 3531 Aufrufe, 6 Kommentare

Hallo alle zusammen,

seit ca. 2 Stunden suche ich nach einer Lösung für mein Problem, und finde keins.


Der Grund liegt wohl in der art und weise wie ich die Daten importieren möchte.

Und zwar...

Die "Haupttabelle" enthält Daten (Festkommazahlen die die entnommene Probenmenge darstellen) die Spaltenweise nach dem jeweiligen Datum eingetragen sind, und Zeilenweise nach der entsprechenden Entnahmestelle geordnet.

Die Tabelle beinhaltet mehrere hundert Entnahmestellen, und immer nur einige Entnahmestellen werden je Tag angegangen. Um ein ständiges auf und ab scrollen bei der Eingabe zu vermeiden, würde ich gerne in eine temporäre Tabelle die Daten von einem Tag eingeben, und importieren lassen. Hierbei stellt sich das Problem, dass nur die Spalte (die zweite) mit der Probenmenge importiert werden muss. Die erste enthält die Entnahmestelle.

Ich benutze Office 2010.

Ich hoffe ihr versteht was ich vorhabe? Leider habe ich keine Ahnung, wie ich da vorgehen muss.


Hoffentlich könnt ihr mir helfen. Danke jetzt schonmal.

Mit freundlichen Grüßen,

Enoch23
Mitglied: certifiedit.net
15.08.2014 um 01:25 Uhr
Hallo Enoch,

poste mal bitte Bsphafte Screenshots.

Grüße
Bitte warten ..
Mitglied: 06Down
LÖSUNG 15.08.2014, aktualisiert um 18:36 Uhr
Hallo,

wenn es nur darum geht, das Scrollen zu vermeiden, kannst Du auch einfach einen Filter in deine Liste einfügen und jeweils nach der Entnahmestelle filtern.

Andernfalls kann man ein Makro schreiben, welches Deine temporäre Tabelle zeilenweise durchgeht (Spalte dürfte es ja nur eine mit Werten des aktuellen Entnahmevorganges geben) und in der Haupttabelle die Werte in der richtigen Spalte bei der jeweiligen Entnahmestelle einträgt. Dabei kann die temporäre Tabelle entweder eine neue Excel-Datei oder ein zweites Tabellenblatt in der Haupttabelle sein.

Gruß

Update:

Ich hatte gerade noch ein bisschen Zeit. Anbei mal ein Code, der die Werte von Tabellenblatt2 an die richtige Stelle in Tabellenblatt1 überträgt.
Ich bin jetzt sicher kein VBA-Profi aber bei mir funktioniert das so.
01.
Private Sub cmdExport_Click() 
02.
 
03.
'In diesem Beispiel ist Tabelle1 die Haupttabelle und Tabelle2 die temporäre Tabelle. 
04.
'In Tabelle1 stehen die Namen der Entnahmestellen in Spalte A beginnend bei Zeile 3. 
05.
'Die Tage der Entnahme stehen in Zeile 2 beginnend bei Spalte B 
06.
'In Tabelle2 (tempoärer Tabelle) stehen die Namen der Entnahmestellen in Spalte A beginnend bei Zeile 3. 
07.
'Der Entnahmentag steht in Zelle B2. 
08.
'Darüber hinaus existiert ein Button in der temporären Tabelle. 
09.
'Beim Klicken wird der unten zu sehende Code ausgeführt. 
10.
 
11.
On Error Resume Next 
12.
 
13.
Dim i, j, k As Integer 
14.
Dim Tag As Date 
15.
 
16.
'Tag der aktuellen Werte einlesen 
17.
Tag = Sheets("Tabelle2").Cells(2, 2) 
18.
 
19.
'temporäre Tabelle zeilenweise durchlaufen 
20.
For i = 3 To Sheets("Tabelle2").UsedRange.SpecialCells(xlCellTypeLastCell).Row 
21.
     
22.
    'Hauptabelle zeilenweise durchlaufen bis zum Match 
23.
    For j = 3 To Sheets("Tabelle1").UsedRange.SpecialCells(xlCellTypeLastCell).Row 
24.
            
25.
        'Namen der Entnahmenstellen beider Tabellen vergleichen 
26.
        If Sheets("Tabelle2").Cells(i, 1) = Sheets("Tabelle1").Cells(j, 1) Then 
27.
             
28.
            'Spalten Haupttabelle durchlaufen bis zum Match 
29.
            For k = 2 To Sheets("Tabelle1").Cells(2, Columns.Count).End(xlToLeft).Column 
30.
             
31.
                'Richtige Spalte in Hauptabelle suchen 
32.
                If Tag = Sheets("Tabelle1").Cells(2, k) Then 
33.
                 
34.
                    'Wert von temporärer in Haupttabelle schreiben 
35.
                    Sheets("Tabelle1").Cells(j, k) = Sheets("Tabelle2").Cells(i, 2) 
36.
                 
37.
                    Exit For 
38.
                End If 
39.
     
40.
            Next k 
41.
     
42.
            Exit For 
43.
        End If 
44.
     
45.
    Next j 
46.
     
47.
Next i 
48.
 
49.
If Err.Number = 0 Then 
50.
    MsgBox "Übertrag erfolgreich" 
51.
Else 
52.
    MsgBox Err.Description 
53.
End If 
54.
 
55.
End Sub 
56.
 
Wie man einen Button in eine Exceltabelle einfügt kannst Du Dir hier anschauen:
http://office.microsoft.com/de-de/excel-help/hinzufugen-einer-schaltfla ...
Bitte warten ..
Mitglied: Enoch23
15.08.2014 um 14:05 Uhr
Oh danke danke! Probiere ich gleich aus!

Aus Datenschutzgründen ;) kann ich die eigentlich Tabelle nicht zeigen, die natürlich sehr viel übersichtlicher aussieht.

892b67857843ef35cfc90bfe2e4adc04 - Klicke auf das Bild, um es zu vergrößern


Hoffe das erläutert etwas besser was ich vorhabe.
Danke
Bitte warten ..
Mitglied: colinardo
LÖSUNG 15.08.2014, aktualisiert um 18:36 Uhr
Moin Enoch23,
hier noch ein Beispiel einer Eingabedatentabelle:
Dateneingabe_mit_Import_In_Datentabelle_246520.xlsm
(Kommentare befinden sich im Code)

Grüße Uwe
Bitte warten ..
Mitglied: Enoch23
15.08.2014 um 16:35 Uhr
@06Down

Der Code Funktioniert prima! Musste jediglich die Spalten und Zeilen nummern anpassen, und siehe da, es läuft!


Vielen vielen dank!


@colinardo

Danke für die Tabelle! Gefällt mir, dass das Datum automatisch eingetragen wird.




Danke euch für eure mühe!
Bitte warten ..
Mitglied: 06Down
15.08.2014 um 16:57 Uhr
Hi,

freut mich dass ich helfen konnte.
Nicht vergessen den Thread als gelöst zu markieren

Gruß
Jens
Bitte warten ..
Neuester Wissensbeitrag
Windows 10

Powershell 5 BSOD

(8)

Tipp von agowa338 zum Thema Windows 10 ...

Ähnliche Inhalte
VB for Applications
Bestimmte Daten aus eine CSV-Datei in eine Excel-Tabelle importieren (2)

Frage von MariaElena zum Thema VB for Applications ...

Microsoft Office
Word Dokument (vorausgefüllte Formulare) aus Excel Tabelle generieren (1)

Frage von Server4Alle zum Thema Microsoft Office ...

Microsoft Office
gelöst Verschieben von Zellinformation in andere Spalte (per VBA) excel 2010 (5)

Frage von thomas1972 zum Thema Microsoft Office ...

Heiß diskutierte Inhalte
Microsoft
Ordner mit LW-Buchstaben versehen und benennen (20)

Frage von Xaero1982 zum Thema Microsoft ...

Outlook & Mail
gelöst Outlook 2010 findet ost datei nicht (19)

Frage von Floh21 zum Thema Outlook & Mail ...

Netzwerkmanagement
gelöst Anregungen, kleiner Betrieb, IT-Umgebung (18)

Frage von Unwichtig zum Thema Netzwerkmanagement ...

Festplatten, SSD, Raid
M.2 SSD wird nicht erkannt (14)

Frage von uridium69 zum Thema Festplatten, SSD, Raid ...