Datenimport mit Punkt Komma Problem und Bezugsverlust :: Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office

Einloggen, um private Nachrichten zu lesen

Downloads

[Excel 2007] Datenimport mit Punkt Komma Problem und Bezugsverlust

Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office Foren-Übersicht » Microsoft Excel Hilfe

Autor

Nachricht

Stu
Office-Hilfe.com-Neuling

Anmeldedatum: 08.01.2010
Beiträge: 14

Verfasst am: 08.02.2010, 18:24

Hallo liebe Excelgemeinschaft,

ich habe hier eine Exceldatei mit einem Datenimportmakro. Es funktioniert bis auf zwei Probleme alles sehr gut:

1. Die importierten Daten überschreiben nicht den zugewiesenen Bereich sondern werden in neue Spalten geschrieben, so das der Bezug auf Formeln nicht mehr stimmt

2. Die Importdaten (liegen in der Datei Daten vor) besitzen als Dezimaltrennzeichen einen Punkt und werden im deutschem Excel als falscher Wert angezeigt

Ich habe meine Problemdatei hier mitsamt der Datendatei hochgeladen.

Falls einer eine Idee hat dieses Problem an dem ich jetzt schon lange sitzt zu knacken bin ich echt erleichtert

Danke.
Stu

datenimportmakro.xlsm

Beschreibung:

Download

Dateiname:

datenimportmakro.xlsm

Dateigröße:

96.27 KB

Heruntergeladen:

7 mal

Stu
Office-Hilfe.com-Neuling

Anmeldedatum: 08.01.2010
Beiträge: 14

Verfasst am: 10.02.2010, 09:08

Hier der Code den ich bis jetzt habe:

Option Explicit

Sub Datenimport()
Dim Importdatei$, Verzeichnis$, aktiver_Blattname As String
Application.ScreenUpdating = False
aktiver_Blattname = ActiveSheet.Name
Sheets("Tabelle2").Activate
Verzeichnis = "d:\"
On Error Resume Next
ChDir Verzeichnis
Importdatei = Application.GetOpenFilename("Klimadaten (*.*), *.*")
Application.ScreenUpdating = False
With ActiveSheet.QueryTables.Add(Connection:="TEXT;" & Importdatei, _
Destination:=Range("A1"))
.TextFileTabDelimiter = True

.Refresh BackgroundQuery:=False
End With
Columns("H:N").Select
Selection.Cut
Columns("a:g").Select
Selection.Paste
Columns("H:N").Select

Selection.Delete Shift:=xlToLeft
Sheets(aktiver_Blattname).Activate

End Sub

Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office Foren-Übersicht » Microsoft Excel Hilfe

Thema		Autor	Forum	Antworten	Verfasst am
Ähnliche Beiträge
	Einfaches Problem...	Dirk	Microsoft Excel Hilfe	1	09.03.2010, 20:01
	Sverweis, Problem mit Matrix	Satsuki	Microsoft Excel Hilfe	12	09.03.2010, 16:02
	Problem bei Zellenformatierung "...	Herbie.four	Microsoft Excel Hilfe	2	02.03.2010, 12:44
	Problem bei Excel Werte aus Datenblat...	gio2000	Microsoft Excel Hilfe	4	26.02.2010, 18:09
	Problem mit Feldfunktion in der Kopfz...	granne	Microsoft Word Hilfe	0	25.02.2010, 22:12

Gehe zu:

Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum posten
Du kannst Dateien in diesem Forum herunterladen

Haftungsausschluss/Disclaimer

SMS kostenlos versenden | Tuning Forum | krankenversicherungsvergleich | Wii Modchip Xbox 360 Konsole

Powered by phpBB © 2001, 2002 phpBB Group :: FI Theme :: Alle Zeiten sind GMT + 1 Stunde
Deutsche Übersetzung von phpBB.de