Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 18:04:29
Formel fehler Wert#
18.04.2024 17:45:21
Shellkommando ausführen, stderr auslesen
18.04.2024 17:41:41
Summe: Bestimmter Bereich mit sverweis
18.04.2024 16:33:24
Worksheets variable
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1012to1016
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1012to1016
1012to1016
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

ActiveSheet.Cells(ActiveCell.row, 243).Activate ??

ActiveSheet.Cells(ActiveCell.row, 243).Activate ?
08.10.2008 20:14:00
Mathias
Hallo,
folgende Zeile führt bei mir dazu, dass die aktive Zelle außerhalb des Bildschirms liegt:
ActiveSheet.Cells(ActiveCell.row, 243).Activate
Verwende ich dagegen:
ActiveSheet.Cells(ActiveCell.row, 242).Activate
dann scrollt die Tabelle nach rechts bis Spalte 242 und die aktive Zelle ist sichtbar.
Die Zellen in der Tabelle sind eigentlich alle gleich formatiert und ohne Zellschutz oder dergleichen.
Kann das jemand nachvollziehen oder mir einen Tipp geben, wie dieser merkwürdige Effekt zu erklären bzw. abzustellen ist?
Viele Grüße
Mathias

17
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: ActiveSheet.Cells(ActiveCell.row, 243).Activate ?
08.10.2008 20:16:09
Original
Hi,
verwende Application.Goto mit dem parameter scroll:= True
mfg Kurt
AW: ActiveSheet.Cells(ActiveCell.row, 243).Activate ?
08.10.2008 20:32:00
Mathias
Hi Kurt,
wenn ich Application.Goto verwende, müßte ich aber irgendwie "Cells(ActiveCell.row, 243)" in ein Range-Objekt umwandeln, oder?
Viele Grüße
Mathias
AW: ActiveSheet.Cells(ActiveCell.row, 243).Activate ?
08.10.2008 21:09:00
Original
Hi,
sei nicht so faul und probier es einfach.
mfg Kurt
Ist nicht nötig die Umwandlung
AW: ActiveSheet.Cells(ActiveCell.row, 243).Activate ?
08.10.2008 21:27:33
Mathias
Hi Kurt,
dank für die Motivation ;-)
Hab die Lösung gefunden:
Application.Goto Reference:=Cells(ActiveCell.row, 245), Scroll:=True
Dummerweise springt die aktive Zelle nicht einfach nur nach rechts, sondern auch noch nach oben.
Eigentlich sollte ActiveCell.Row an der gleichen Bildschirmposition bleiben...
Viele Grüße
Mathias
Anzeige
AW: ActiveSheet.Cells(ActiveCell.row, 243).Activate ?
08.10.2008 22:18:52
Original
Hi,
Problem in der ursprünglichen Frage ist nicht nachvollziehbar!
Versuchs mal so:
Cells(ActiveCell.row, 245).Activate
ActiveWindow.ScrollColumn = 245
mfg Kurt
AW: ActiveSheet.Cells(ActiveCell.row, 243).Activate ?
08.10.2008 20:16:25
Tino
Hallo,
verwende .Select
Gruß Tino
noch was...
08.10.2008 20:22:00
Tino
Hallo,
...ActiveSheet kannst Du Dir sparen
mit
Cells(ActiveCell.row, 243).select
wird immer die aktive Tabelle angesprochen
Gruß Tino
AW: noch was...
08.10.2008 20:33:19
Mathias
Hallo Tino,
danke für den Tipp!!!
Es macht allerdings keinen Unterschied, ob ich activate oder select verwende.
Viele Grüße
Mathias
AW: noch was...
08.10.2008 20:39:41
Tino
Hallo,
kannst Du diese Tabelle mal hochladen, dass hab ich noch nicht gesehen.
Gruß Tino
Anzeige
AW: noch was...
08.10.2008 20:46:23
Mathias
Hallo Tino,
würde ich gerne machen. Ist aber leider viel zu groß.
Viele Grüße
Mathias
schade... :-( Frage ist offen - oT.
08.10.2008 20:48:53
Tino
AW: noch was...
08.10.2008 21:26:00
Reinhard
Hi Mathias,
ich hab den Thread nur überflogen, aber meinst du nicht daß du deine Datei auf unter 300 Kb drücken kannst, 50.000 Zeilen und alle bunt braucht hier keiner, wichtig ist einzig daß das Problem erhalten bleibt....
Wenn es nicht anders geht, lade es hier hoch http://www.hostarea.de
aber nimm dann in Kauf daß du dir ggfs, böse Kommentare einhandelst wenn dein Problem in wenigen oder anderen Worten oder mit einer 60KB Datei auch erklärbar gewesen wäre.
Gruß
Reinhard
Anzeige
AW: noch was...
09.10.2008 11:11:00
Mathias
Hallo Reinhard,
hab es doch noch geschafft, eine kleine Datei fertigzustellen, die das Problem zeigt.
https://www.herber.de/bbs/user/55909.xls
Es scheint offensichtlich mit dem Einsatz von Scrollarea zusammen zu hängen, worauf ich allerdings relativ schlecht verzichten kann. Und die Scrollarea ist ja eigentlich auch groß genug...
Vielleicht findet ja noch jemand eine Lösung. Würde mich sehr freuen. Vielen Dank für´s Testen.
Viele Grüße
Mathias
AW: noch was...
09.10.2008 12:40:53
Mathias
Hi Tino,
tritt der Fehler bei Dir nicht auf?
Bei mir verschwindet die aktive Zelle bei Spalte 254 irgendwo rechts außerhalb des Bildschirms,
wenn ich [End] drücke.
Viele grüße
Mathias
AW: noch was...
09.10.2008 12:57:11
Tino
Hallo,
man sollte immer alles lesen, ja es liegt daran.
Lösungsvorschlag:
Dim meScroll As String
With Kalender
 meScroll = .ScrollArea
 .ScrollArea = ""
 Cells(ActiveCell.row, .Cells(2, 5)).Select
 .ScrollArea = meScroll
End With


Gruß Tino

Anzeige
ERLEDIGT
09.10.2008 13:27:00
Mathias
Hallo Tino,
auf die Idee wäre ich jetzt nicht gekommen, mal eben die Scrollarea ab- und wieder anzuschalten.
Funktioniert wunderbar, selbst in einer Datei mit Freigabe. Vielen, vielen Dank! :-)
Viele Grüße
Mathias

194 Forumthreads zu ähnlichen Themen

Problem mit ActiveCell.Offset
Markus

Hallo zusammen,
ich habe ein Problem mit ActiveCell.Offset. Da es unter einer anderen Überschrift fast keine Resnonanz gab, stelle ich die Frage nun geändert neu (so wird es zumindest empfohlen, bevor einer meckert :-) ).
Auf der Arbeit lese ich Hostanwendungen aus, und trage die Daten...
13.12.2008 19:06:04
Thread-ID: 1032683
6 Beiträge
Anzeige
Set rngOld = ActiveCell in Row ändern möglich?
Karsten

Hallo,
ich möchte einen Befehl abändern.
Dim rngOld As Range
Set rngOld = ActiveCell
Range("a10").Select
rngOld.Select
End Sub
Er soll jetzt so ausgeführt werden, dass nicht die alte Zelle sondern in der alten Zeile die Zelle in der 10 Spalte angesteuert wird. Geht...
27.07.2009 17:08:37
Thread-ID: 1091676
11 Beiträge
ActiveCelle Offset | Herbers Excel-Forum
Mister B
Hallo und guten Abend,
mit dem Befehl ActiveCell.Offset trage ich Werte in eine Tabelle ein. z.B.
ActiveCell.Offset(1, 0) = "F"
ActiveCell.Offset(2, 0) = "F"
ActiveCell.Offset(3, 0) = "F"
ActiveCell.Offset(4, 0) = "F"
Leider ist die entsprechende Zelle nicht "aktiv". Wie k...
04.01.2010 19:17:29
Thread-ID: 1127129
3 Beiträge
Anzeige
Offset - ActiveCell
Philipp

Hi!Bitte um eure Hilfe:
Ich muss aus der Quelltabelle einen Wert auslesen, diesen dann in eine andere Tabelle eintragen (der Teil läuft OK), dann in der Quelltabelle die ActiveCell eine Zeile nach unten verschieben, diese neue ActiveCell kopieren, zur Zieltabelle wechseln, ... einfügen, ......
16.05.2002 15:01:37
Thread-ID: 121392
2 Beiträge
ActiveCell.offset Bug, Combobox range
Max

Hallo liebe Com,
Ich arbeite seit geraumer Zeit mit Excel und Vba.
Zurzeit bin ich in einen kleinen Projekt mit dem ich einen "Generator" schreibe.
Hier zuerst einmal ein paar Bilder und Daten.
http://i51.tinypic.com/33cu2kp.jpg
ist die Userform
http://i53.tinypic.com/r7...
22.06.2011 21:54:31
Thread-ID: 1219374
10 Beiträge
ActiveCell.Row ( Spalte dann von : bis ) ?
:

Hallo Forum,
bräuchte bitte eure Hilfe bei einer VB Anweisung
ich möchte gerne an irgendeiner Stelle meiner ganzen Anweisungen folgendes anweisen
Bei der aktiven gewählten Zeile soll dann Spalte 2 bis 9 leer sein ( ="" ) ( .clearcontent ? )
habe folgendes probiert : ' Cells(Act...
20.10.2011 10:31:33
Thread-ID: 1234656
4 Beiträge
kopieren von ActiveCell.Row zu Target
ActiveCell.Row

Hallo Excelspezis
bräuchte bitte eine passende Anweisung für folgende Problematik
Target.Row , 4 = Cells(ActiveCell.Row,4).Value oder so ähnlich, bzw. richtig eben.
Hier fehlt mir die richtige Definition wie man Target als aktiveZeile,Spalte 4 angibt.
Das ganze soll dann im "B...
26.10.2011 16:47:19
Thread-ID: 1235531
7 Beiträge
ActiveCell.Row - mehrere Zeilen anwählen
Frischy1990

Guten Tag,
in meinem Makro habe ich aktuell folgenden Befehl:
lngRow = ActiveCell.Row
Das Ziel dabei ist, dass ich eine Zelle anwähle und alle Werte die in dieser Reihe stehen in eine andere Tabelle kopiert werden.
Wenn ich nun jedoch mehrere Zellen in unterschiedlichen Reihen...
20.06.2012 09:54:19
Thread-ID: 1268074
11 Beiträge

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
5
2
10
2
2
1
9
3
6
10
3
27
12
7
9
3
5
3
10
2
5
5
2
3
2