Netzer82

Für Fußballer gibt es hier ein lustiges Torwandschießen. Ich bin aber kein Fan dieses Vereins

Ich habe das Glück, dass ich noch im Hotel "Mama" wohne. Da wird abends gefragt ob ich was mitnehmen will. Wenn ja, gibts Brot oder Brötchen. Dazu Obst oder Schokolade oder beides. Oft gehe ich aber auch in die Kantine (fremdfirma), Mensa oder ans Kiosk (wenn ich mal Currywurst o.ä. haben will).

Hi, ich müsste in einem tif, gif oder jpg Bild Die weißen Flächen Transparent machen. Zur Verfügung habe ich CorelDraw und CorelPhotoPaint (beides in Version 8). Kann man das überhaupt machen und wenn ja wie???

@Saga Stimmt es gibt hässlichere

Sorry, habe noch einen Artikel weitergelesen. Den findet ihr hier

Endlich, die Welt merkt wieder, dass gute Musik nur mit Klavier oder Gitarre gemacht werden kann und schöne Stimmen nicht nur aus dem Computer kommen müssen. Ach ja und hübsch muß man auch nicht wirklich sein, siehe Alanis Morisette.

Glückwunsch nach Rostock. Die Bundesliga an sich gefällt mir bisher ganz gut und bis auf zwei Ausnahmen, konnte man sich nicht über die Schiedsrichter beschweren. Hoffentlich bleiben die vermeintlichen Underdogs noch eine Weile so gut dabei. Wäre schön, wenn nicht nur Leverkusen sondern auch mal Dortmund oder Schalke geärgert wird. Als Gladbach Fan kann ich mich momentan auch nicht beschweren. Der UI-Cup ist immer noch in Reichweite.

Ja schon verstanden aber die Sache ist die, dass wenn ich anstatt der Integer Variable einer Variant Variable, sagt mir VBA, dass die Typen unverträglich sind. Ich kann es allerdings nicht mit Integer lösen, weil zwei Dezimalstellen immer angezeigt werden müssen. Mit der Funktion CVar geht es übrigens auch nicht.

Wie bekomme ich den Inhalte ienr Zelle einer Word Tabelle in eine Variant Variable um anschließend damit ein Endergebnis zu errechnen. Genauer gesagt es soll die Zwischensumme zur Mehrwertsteuer dazugezählt werden und dann das Ergebnis in eine eigene Zelle geschrieben werden. Ist das Grundsätzlich möglich und wenn ja wie ?

Also ich war bei Rock-am-Ring und werde auf dem Weg zum Plattensee mal das Pepsi Sziget Festival mit den Hosen mitnehmen (aber nur die Hosen) Ansonsten war ich noch auf'm Nonstock. Ein Ska und Punkfestival glaub ich. Habe vor lauter Alkohol und Frauen nicht wirklich viel mitgekriegt.

Nur so als Frage: Ist das auch für Hessen vorgesehen ? Im Internet steht nur etwas von Oberrhein und der ist nicht in Hessen.

Hast du vielleicht ein paar Links dazu ???

Hi, also ich lerne offiziell FIAE aber mehr als Makros habe ich bisher nicht entwickelt. Ich bin darüber nicht sehr glücklich. Jetzt meine Frage. Kann ich während der Ausbildung so etwas wie ein Praktikum in einer anderen Firma machen, wo ich vielleicht in die Geheimnisse der Softwareentwicklung eigeweiht werde? Wir entwickeln nämlich keine Software, wir prüfen sie nur. Hoffe ihr könnt mich verstehen und mir einen Rat geben.

Also ich bin bis vor kurzem einen Fiat Uno mit 75 (!!!) PS, bis er mir von einem Opel Omega kaputt gefahren wurde *heul*. Jetzt fahre ich einen Mazda 323 F Automatik. Der ist auch ganz nett. Einzigstes Problem: Sieht sportlich aus, also tief und schnittig, aber weich gefedert wie 'ne Matraze für's Wasserbett. Der nächste ist aber wieder ein Fiat

DANKESCHÖN

Hab ich das wenigstens mit diesem Befehl richtig gemacht ???

Moin, ich würde gerne in einer einzelnen Zelle das Format für eine Zahl festlegen. Ich habe es mit folgendem Code versucht: Dim dblWert As Currency dblWert = 0# Format(dblWert,"#,##0.00") Was ist daran falsch. Also dass ihr mich nicht falsch versteht, ich will das Format der Variable festlegen.

Wollte nursagen, dass ich es geschafft habe. Es war nicht die letzte sondern die vorletzte "Column". Also musste ich bei Count.Columns noch -1 dazuschreiben. Trotzdem Danke für deine Mühe.

Ich habe eine Vermutung, warum da 0 rauskommt und zwar: Der Funktionsname Val wandelt Zeichenketten in Zahlen um. Bei den oberen Zellen handelt es sich aber ausdrücklich um Zahlen. Kann das so einigermassen stimmen ???

Also ich danke dir trotzdem. Ich werde mal weiterversuchen. Freitag ist Abgabe, bis dahin werd ich auch eine Lösung finden Thanx a lot

Ich habe das jetzt mal eingefügt aber es kommt 0 heraus. Habe ich etwas vergessen umzuschreiben oder werden diese Zeilen schon vorher "ausgehebelt" ?

Dann sei doch so nett und erkläre mir das mit VBA, weil das mit den Formeln gefällt mir auch nicht so. Das Makro hat aber nicht für jede Zelle eine Variable, sondern geht durch eine Do-While-Schleife, deren Anzahl an durchläufen zu Beginn vom Benutzer festgelegt wird. Deshalb verscuhe ich ja die Werte aus den Zellen zu ziehen und nicht direkt über VBA zu bverechnen.

Also ich habe eine Tabelle von Word eingefügt. Die bisherigen Summen berechne ich über folgende Formel: SUM(ÜBER), da heißt also, dass ich die Summe aus den darüber liegenden Zellen bilde. Die Mehrwertsteuer bilde ich folgendermassen: (SUM(ÜBER)*0,16)/2 Ich muß jetzt nur wissen, wie ich genau diese beiden in einer dynamischen Tabelle anspreche. Wäre das eine statische Tabelle ginge es ja ähnlich wie in Excel (=sum c6:c8 (um die summe der Zelleninhalte von c6 bis c8zu bilden)).

Hi Leute, ic habe ein Problem. Ich habe in Word eine dynamisch Tabelle für eine Rechnung. An den unteren Enden der Tabelle, sollen Zwischensumme, Mehrwertsteuer und Endsumme errechnet werden. Jetzt habe ich schon eine Lösung für die Zwischensumme und die Mehrwertsteuer gefunden, aber mit der Endsumme hakt es noch. Wer kann mir helfen, wie ich meinem Makro beibringe, dass er nur die 2 Zellen über der Zelle zusammenrechnet ?

Hi Leute ich habe ein verdammt großese Problem. Der folgende Code soll eine Tabelle in MSWord um die einzugebenden Daten ergänzen. Jatz sollen neue Tabellenzeilen unter die gerade erstellte Zeile und nicht darüber erstellt werden. Wo muß cih meinen Code ändern ? Sub rechnungsentwurf() Dim intPostenzaehler() As Integer Dim strPostennummer As String Dim intPosten As Integer Dim intTicker As Integer Dim curPostenpreis As Currency intPosten = 1 intTicker = 0 intPosten = InputBox("Bitte geben sie die Anzahl der zu berechnenden Posten ein !") ActiveDocument.Bookmarks("Wechsel").Select 'Selection.InsertRows 1 'Neue Zeile wird angelegt 'Selection.Collapse Direction:=wdCollapseStart Do While (intTicker <> intPosten) intTicker = intTicker + 1 strPostenname = InputBox("Bitte geben sie den " & intTicker & "ten Posten ein") curPostenpreis = InputBox("Bitte geben sie den Preis des Postens ein.") Selection.Text = intTicker Selection.MoveRight Unit:=wdCell Selection.Text = strPostenname Selection.MoveRight Unit:=wdCell Selection.Text = curPostenpreis Selection.MoveLeft Unit:=wdCell, Count:=2 Selection.InsertRows 1 'Neue Zeile wird angelegt Selection.Collapse Direction:=wdCollapseStart Loop MsgBox ("Auf Wiedersehen :-)") End Sub