Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 18:34:36
Welches Datum gibt mein M-Code aus?
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1776to1780
1776to1780
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zugriffsbereich in mehreren Tabellen

Forumthread: Zugriffsbereich in mehreren Tabellen

Zugriffsbereich in mehreren Tabellen
02.09.2020 09:25:50
Mike
Hallo!
Ich möchte in den Tabellen 102 - 150 den Zugriff einschränken.
Ich könnte vermutlich die Zugriffe von 102 bis 150 wie unten angeführt schreiben, aber gibt es da nicht eine Möglichkeit, den Befehl verkürzt zu schreiben?
Private Sub Workbook_Open()
'Zugriffsbereich einschränken
Tabelle102.ScrollArea = "A10:AA5000"
Tabelle103.ScrollArea = "A10:AA5000"
Tabelle104.ScrollArea = "A10:AA5000"
Application.ScreenUpdating = False
Application.AskToUpdateLinks = False
Application.ScreenUpdating = True
End Sub
Wäre toll, wenn Ihr mir helfen könntet.
LG
Mike
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zugriffsbereich in mehreren Tabellen
02.09.2020 10:31:21
fcs
Hallo Mike,
probiere mal folgendes: 
Private Sub Workbook_Open()
Dim wks As Worksheet, iSheet As Integer, sCodename As String
'Zugriffsbereich einschränken
For Each wks In Me.Worksheets
sCodename = wks.CodeName
For iSheet = 102 To 150
If sCodename = "Tabelle" & iSheet Then
wks.ScrollArea = "A10:AA5000"
End If
Next
Next
Application.ScreenUpdating = False
Application.AskToUpdateLinks = False
Application.ScreenUpdating = True
End Sub
LG
Franz
Anzeige
AW: Zugriffsbereich in mehreren Tabellen
02.09.2020 11:27:38
Mike
Hallo Franz!
Hat leider nicht funktioniert - keine Einschränkung und auch keine Fehlermeldung.
LG
Mike
;

Forumthreads zu verwandten Themen

Datenbereich dynamisch in Pivot-Tabelle einbinden
Markus

Hallo allerseits,
ich habe folgendes Problem. Für die Erstellung einer Pivot-Tabelle muß ich den Datenbereich manuell selektieren. Da sich aber mein Datenbereich ständig ändert, würde ich das ganze automatisiert selektieren lassen. Wie krieg' ich das in dem folgenden Makro unter ?:
Rang...
02.09.2008 14:20:30
Thread-ID: 1006792
4 Beiträge
Bereich von Tabelle1 als Grafik in Tabelle2 einfüg
Tabelle1

Hallo Leute,
ich komm irgendwie nicht weiter und benötige Hilfe.
es soll z.B. von Sheets("Tabelle1") Range("a1:b5")
als Grafik
in Sheets("Tabelle2")
Gruss
Atikar
19.11.2008 17:09:19
Thread-ID: 1026118
3 Beiträge
Anzeige
Zelle suchen + umliegenden Bereich in neue Tabelle
Schulze

Guten Tag zusammen,
ich bräuchte ein Makro, welches mir nach einem bestimmten Suchwort jede Zelle ausliest und diesen Inhalt mit einem darüber und darunter liegenden Bereich in die Tabelle2 untereinander kopiert.
Das Suchwort kommt natürlich in der Tabelle 1 Bereich A1:A65536 mehrmals v...
17.02.2009 15:51:00
Thread-ID: 1051532
4 Beiträge
Bereich Einfügen als HTML in andere Tabelle
Karel

Hallu zusammen,
Ich (Markieren)kopieren aus Tabelle1 Range B1:K300 füge diese in Outlook body ein dan wieder neu heraus kopieren nach Excel in Tabelle 2, und über Inhalt einfügen einfügen als HTML kopieren ich alles wieder ab Zelle B10 in Tabelle2. ich habe dann ein Kopie von Tabelle 1 nur...
08.03.2009 11:55:19
Thread-ID: 1057829
6 Beiträge
Bereiche in versch. Tabellenblättern addieren
Maris

Hallo Zusammen,
ich habe mehrere Tabellenblätter alle das selbe Format, und ich möchte im letzten eine Summe aller Zellen der anderen Tabellenblätter machen (also quasi konsolidieren). Ist das mit Formel möglich, ohne immer zwischen den Tabellenblätter zu sprigen macht das total aufwendig.....
09.03.2009 13:09:34
Thread-ID: 1058132
3 Beiträge
Variabler Bereich einer Tabelle im Sheet drucken
B4u

Hallo,
in einer Pivotabelle habe ich ein Button, der ein Markro ansteuert, welches den Print-Dialog aufruft.
Code:
Private Sub CommandButton1_Click() Application.Dialogs(xlDialogPrint).Show ActiveSheet.PageSetup.PrintArea = False End Sub
Mit diesem Sub wird das gesamte Work...
01.06.2009 16:12:42
Thread-ID: 1078474
7 Beiträge
2 Bereiche in eine Tabelle
Salim


Hallo,
eine Frage :
Ich habe eine Tabelle mit zwei Bereichen erstellt.
B1:I41 und B43:I80.
Ich moechte jetzt bei oeffnen der Tabelle nur den ersten Bereich einblenden und zwar so dass er fixiert ist (kein scrollen nach rechts moeglich).
Beim runterscrollen sollte dann d...
13.08.2009 14:05:07
Thread-ID: 1095603
4 Beiträge
Makro zum kopieren von Bereichen in neue Tabelle
Bereichen

Hallo zusammen,
https://www.herber.de/bbs/user/64724.xls
ich habe eine große Tabelle die in Spalte A bis E immer die Kategorien darstellt für die dahinterliegenden Blöcke, es gibt mehrere Blöcke insg. 27. Ein Block setzt sich aus mehreren genau definierten Spalten zusammen (s. Excel-t...
27.09.2009 07:25:50
Thread-ID: 1105734
3 Beiträge
Anzeige
Pivot Tabelle in Tabelle mit Spalten umwandeln??
okgi

Hallo liebe Excel Gemeinde!!
Meine Frage ist: wie kann ich eine Pivot Tabelle in eine Tabelle mit Spalten automatisiert überführen?
Zum Beispiel:
Pivot Tabelle
________KST_____________
Konto_.......1...........2...........3..
__A___.100,00................31,99
__B___...
15.12.2009 17:35:51
Thread-ID: 1124143
3 Beiträge
Anzeige
Bereichsbezüge sind in Tabellenbl. unterschiedlich
sunni

Hallo alle zusammen,
ich habe für eine Arbeitsmappe Bereichsnamen vergeben, um besser rechnen zu können.
Da sich diese immer änderten (durch VBA-Löschung von Zeilen habe sie sich immer um 60 reduziert), habe ich sie über VBA nach der Zeilenlöschung neu gesetzt:
wbGesamt.Names.Add "B...
07.01.2010 14:58:32
Thread-ID: 1127894
6 Beiträge
Anzeige
Dringend - Markierten Bereich umwandeln
Bernd

Hallo,
ich habe einen Bereich auf einem Tabellenblatt, den ich von Mio. € in Euro umrechnen will. Kann ich den Bereich markieren und dann mit einer Funktion/Anwendung alles mit 1.000.000 multipilzieren?
Danke im voraus.
Bernd
28.01.2010 10:58:24
Thread-ID: 1133653
4 Beiträge
Excel-Tabellen in Word umwandeln
joko0803

Hallo alle,
ich bin nicht sicher, ob dieses Thema hier her gehört.
Falls nein, wäre ich für das Benennen eines entsprechenden Forums dankbar.
In einem Word Dokument habe ich viele Excel-Tabellen eingebunden.
Dieses Word Dokument muss ich an eine Behörde zur Weiterverarbeitung ve...
07.05.2010 16:29:49
Thread-ID: 1156132
6 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige