Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Optionsfelderfrage und Spalten kopieren in VBA

0 views
Skip to first unread message

Matthias Lendholt

unread,
Oct 17, 2000, 3:00:00 AM10/17/00
to

Hallöchen,
ich habe da mal ein paar Excel-Fragen:

1. Problem:
Aufgrund eines nicht vorhandenen VBA Buches hier auf Arbeit benutze ich
die
Formular-Optionsfelder und nicht die VB Felder. Mit Optionsfelder meine
ich diese runden Radio-Buttons, von denen man einen auswählen kann.
Irgendwie bekomme ich aber alle zusammen nur gemeinsam verlinkt hin,
d.h. alle haben das gleiche Ausgabefeld und interagieren. Ich will sie
aber getrennt voneinander haben in kleinen Gruppen à 2 oder 3 Stück.

Frage: Wie trenne ich diese Optionsfelder (Radio-Buttons) logisch
voneinander ?

2. Problem:
Ich möchte im VBA Code eine Spalte kopieren und auf eine oder mehrere
andere Spalten raufkopieren. Die Anzahl der Spalten hängt aber von einer

im Code ermittelten Variablen ab. Wie bette ich jetzt diesr Variable ein
?

vNODNBT = Cells(1, 3) 'Variable die die Anzahl der Zielspalten angibt
...
Columns("F:" & vNODNBT + 5).Select

So, von der Spalte F bis zu F+vNODNBT +6 (weil F der 6. Buchstabe) -1
(-1 weil F ja schon eine ist) soll das reinkopiert werden.
Dieser Ausdruck funktioniert natürlich nicht.

Frage: Wie bekomme ich den Ausdruck hin, so wie ich es haben möchte ???
Wo müssen "&", "+",""",... hin ? Oder geht das gar nicht ?

DANKE !!!!
Matthias Lendholt


Robert Gelbmann

unread,
Oct 17, 2000, 3:00:00 AM10/17/00
to

Hallo Matthias!

ad (1)
Du hast das Zauberwort schon selbst gesagt: "Gruppen"

Auf der Symbolleiste findest du auch ein Gruppenfeld. Ziehe dieses zuerst
auf und lege die Optionsfeld (pro Gruppe) dort hinein.


ad (2)
Da gibt es mehrere Möglichkeiten: Ich würde folgendes vorschlagen:

ActiveSheet.Columns("F:F").Resize(, vNODNBT).Select


--

In der Hoffnung geholfen zu haben, verbleibe ich mit einem leisen

Servus aus Wien,
-Robert Gelbmann-

P. S.: Ich bitte um Verständnis, daß ich Anfragen ausschließlich in der NG
beantworten kann!

---
MS MVPCE für Excel
EML: <rgel...@mvps.org>
WWW: http://www.roehrenbacher.at/


---"Matthias Lendholt" <Matthias...@icn.siemens.de> schrieb ...

0 new messages