Guten Morgen zusammen,
ich erarbeite momentan in Visual Studio 2010 mit vb.net ein Programm um Rechnungen zu überprüfen, das Programm hat als Grundlage eine Excel Tabelle, diese Tabelle soll im Programm in einem Extra Bereich des Formulars angezeigt werden, über Dialogfenster wird die Tabelle gefüllt.
Nun meine Frage:
Wie füge die Tabelle in mein Programm ein?
Ich danke euch für eure Hilfe
Linden
VSTO
Hallo,
mit Visual Studio Tools for Office, vsto.
Etliche Beispiele dazu findest du z.B. hier:
http://msdn.microsoft.com/en-us/vsto/dd183191
http://msdn.microsoft.com/en-us/vsto/ee676911
Oder hier im werweisswas Forum:
/t/c-und-ms-office/3988141
Grüße
Pako
Hi,
momentan steh ich vor dem Problem das ich keine Zellen in Excel füllen kann. Es gibt einmal feste Zellen und einmal muss die passende Zelle in Abhängigkeit von einer anderen Zelle gesucht und anschließend beschrieben werden. Ich hab schon so manche Möglichkeiten aus VBA verwendet nur diese gehen nicht da VBA nicht mit den Klassen arbeitet die ich in VS10 zu Verfügung habe.
Ich hoffe es hat jmd. einen Vorschlag wie man das Problem beheben können.
Danke im vor raus schon mal.
Linden
Hallo, Linden.
momentan steh ich vor dem Problem das ich keine Zellen in
Excel füllen kann.
Ich weiß nicht genau, wie Du das meinst. Falls du auf der Suche nach der richtigen Systax bist, probiere bitte das Folgende aus:
Globals.Tabelle1.Range("A1").Value = "A1"
VG
Carsten
Hi,
ich habe 2 Tabellen, in der ersten wird ein Wert(Endwert) ausgerechnet die einer bestimmen Nummer (KN-NR) zugewiesen wird.
Nun muss in der 2 Tabelle nach dieser Nummer suchen und 2 Spalten nach links eingefügt werden. Bsp. KN-Nr 12 befindet sich in A12 nun sollte in der Tabelle2 spalten nach rechts gesprungen werden, hier C12, und der Endwert eingetragen werden.
Ich hoffe es ist nun etwas verständlicher.
MfG
Linden
Hallo, Linden.
ich habe 2 Tabellen, in der ersten wird ein Wert(Endwert)
ausgerechnet die einer bestimmen Nummer (KN-NR) zugewiesen
wird.Nun muss in der 2 Tabelle nach dieser Nummer suchen und 2
Spalten nach links eingefügt werden. Bsp. KN-Nr 12 befindet
sich in A12 nun sollte in der Tabelle2 spalten nach rechts
gesprungen werden, hier C12, und der Endwert eingetragen
werden.
Das könntest Du mit einem Schleifen-Durchlauf machen. Beispiel:
Aufruf der Prozedur über Klick auf einen Button
Call EndwertUebertragen(Globals.Tabelle1.Range("B1").Value, Globals.Tabelle1.Range("B2).Value)
(dabei „B1“ und „B2“ anpassen)
Private Sub EndwertUebertragen(ByVal Endwert As Object, ByVal KnNr As Object)
For i As Integer = 1 to 20 'Bereich anpassen
If Globals.Tabelle2.Range("A" & i.ToString).Value = KnNr Then
Globals.Tabelle2.Range("C" & i.ToString).Value = Endwert
Exit For
End If
Next
End Sub
VG
Carsten
Hi Carsten,
Danke für die Idee,
ich habs mit einer for-Schleife und einer If-Anweisung gelöst.Nur ein Problem habe ich noch. Stimmt der Schreibbefehl so?
tabelle2.Cells(Zelle) = endwert