Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Zwischenablage
Autor: Mawashigeri
Datum: 09.08.12 14:53
Hallo Zusammen ! Ich habe folgendes Problem mit VB 2005: Ich möchte aus einem Datagridview einzelne Reihen markieren und anschließend in einer Excel Tabelle eintragen. Ist ja so kein Problem - NUR - Wie bekomme ich die Spalten der Zwischanbalge so hin, dass diese dann in Excel in bestimmten Spalten stehen ? Unter VB 6 habe ich die einzelnen Reihen "gebookmarkt" und diese in die Zwischenablage befördert und dann als string in xls eingefügt - so etwa : Dim bmk As Variant Dim SA As String im Button dann der Code: Clipboard.Clear For Each bmk In Me.DataGrid2.SelBookmarks Me.DataGrid2.SelBookmarks.Add Me.DataGrid2.Bookmark Me.DataGrid2.Bookmark = bmk SA = SA + Me.DataGrid2.Columns("datuma").Text & vbTab & Me.DataGrid2.Columns("konto").Text & vbTab & Me.DataGrid2.Columns("zweckausg").Text & vbTab & vbTab & Me.DataGrid2.Columns("Euro").Text & vbCrLf Clipboard.SetText SA Next bmk Clipboard.SetText SA If SA = "" Then MsgBox "Keine Daten in der Zwischenablage" Exit Sub End If _______________ So jetzt mein Code in VB 2005 der nicht funktioniert: In Button Zwischenablage steht der Code: Clipboard.SetDataObject(Me.DataGridView2.GetClipboardContent()) SA = SA + Me.DataGridView2.CurrentRow.Cells("datuma").Value.ToString & vbTab & Me.DataGridView2.CurrentRow.Cells("konto").Value.ToString & vbTab & Me.DataGridView2.CurrentRow.Cells("zweckausg").Value.ToString & vbTab & vbTab & Me.DataGridView2.CurrentRow.Cells("Euro").Value.ToString & vbCrLf Me.DataGridView2.GetClipboardContent() Clipboard.SetText(SA) 'excel anzeigen objExcel.Visible = True Dim oWbk As Microsoft.Office.Interop.Excel.Workbook oWbk = objExcel.Workbooks.Open(My.Application.Info.DirectoryPath & "\Kassabuch.xls") Me.btnEinZwischenablage.Visible = False Ich hoffe sehr auf eure Hilfe. Schönen Gruß aus Österreich

Zwischenablage	1.280	Mawashigeri	09.08.12 14:53
Re: Zwischenablage	830	DaveS	09.08.12 16:53
Re: Zwischenablage	893	Mawashigeri	10.08.12 08:22
Re: Zwischenablage	880	Micke	10.08.12 09:57
Re: Zwischenablage	820	Mawashigeri	10.08.12 10:38
Re: Zwischenablage	812	Micke	10.08.12 11:29
Re: Zwischenablage	772	Mawashigeri	10.08.12 11:39
Re: Zwischenablage	807	Mawashigeri	10.08.12 11:42

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen