[GastForen

  • Suche
  • Hilfe
  • Lesezeichen
  • Benutzerliste
Forenindex -- Lesezeichen

4 Lesezeichen für tabellen

Tabellenbreite proportional skalieren
Das Script habe ich grade für eine (eigentlich unsympatische) Anfrage im englischen Forum erstellt.
War eh halb fertig ;)
Ich, nicht das Script.
Das war dreiviertelfertig.
Jetzt ist es ganz fertig.

Also dachte ich, hier hat vielleicht auch einer Freude daran:
Es rechnet die Breite einer Tabelle aus (ohne Konturen am Rand) und zeigt diese in einem Dialog an, so dass ich eine neue Breite eingeben kann. Alle Spalten werden dann proportional verbreitert oder -schmälert, um die neue Breite zu erreichen.

Code
tell application "Adobe InDesign CS3" 
set ms to selection
set aTable to parent of item 1 of ms
if class of aTable ? table then
set aTable to parent of aTable
if class of aTable ? table then
display dialog "no table selected"
return
end if
end if

set nC to count columns in aTable
set tWidth to 0.0
repeat with n from 1 to nC
set aWidth to (width of (column n of aTable))
set tWidth to tWidth + aWidth
end repeat

set myDialog to make dialog with properties {name:"Set Width of Table"}
tell myDialog
make dialog column
tell the result
set tNuWidth to make measurement editbox with properties {edit value:(tWidth * 2.83465), edit units:millimeters}
end tell
end tell
set nu to show myDialog
if nu is true then
set nuWidth to (edit value of tNuWidth) * 0.35278
set scaleClm to nuWidth / tWidth
repeat with n from 1 to nC
set aWidth to (width of (column n of aTable))
set width of column n of aTable to (scaleClm * aWidth)
end repeat
else
destroy myDialog
return
end if
end tell

...
Gerald Singelmann
11. Sep 2007, 19:13
|| "Tabelle" finden
Hallo Torben,

Wenn du in der "Text"-Suche nach <0016> suchst findest du die Tabellen. Dann Format ersetzten ...

Bei GREP-Suche funktioniert es allerdings nicht.

Schöne Grüße
Roland
...
drerol74
17. Apr 2012, 13:35
Tabelle: Spaltenbreiten auf alle Tabellen anwenden
Ich habe mich noch mal an die oben geposteten Skripte gemacht und aus den ursprünglich zweien ein Skript gemacht.

Das Vorgehen für das folgende Skript sieht so aus, dass
– erst eine Tabelle markiert wird, aus der die Spaltenbreiten übernommen werden sollen
– dann Skript laufen lassen
– und dabei das Tabellenformat wählen, auf das dokumentweit die Spaltenbreiten aus der ersten Tabelle angewendet werden sollen (Tabellen, die nicht mit dem gewählten Tabellenformat formatiert wurden, bleiben vom Skript unberührt)

Code
//DESCRIPTION: Spaltenbreiten werden von einer markierten Tabelle ausgelesen und auf alle Tabellen, die mit einem bestimmten Tabellenformat formatiert wurden, angewendet. Autor: Karsten Geisler; Kommentare erbeten! design@karsten-geisler.de 
//2012-03-30
#target InDesign

var dasIDDokument = app.activeDocument;
var alleObjekte = dasIDDokument.stories.everyItem().getElements();
var dieSelektion = app.selection[0];

//Spaltenbreiten der gewählten Tabellen werden in die Variable aSpaltenbreiten geschrieben
if (dieSelektion == undefined || dieSelektion.constructor.name != 'Table' ) {
alert('Keine Tabelle ausgewählt\rBitte mit dem Textwerkzeug eine komplette Tabelle auswählen und das Script erneut starten.');
exit();
}
else if ( dieSelektion.constructor.name == 'Table') {
var anzahlKolumnenTab1 = dieSelektion.columns.count();
var kolumnennummerTab1= 0;
var aSpaltenbreitenTab1 = new Array ();
for (var kolumnennummerTab1 = 0; kolumnennummerTab1 < anzahlKolumnenTab1; kolumnennummerTab1 ++ ) {
aSpaltenbreitenTab1.push(dieSelektion.columns[kolumnennummerTab1].width);
}
}

//Dialog, damit User das gewünschte Tabellenformat auswählen kann, auf das die augenommenen Spaltenbreiten angewendet werden
app.scriptPreferences.userInteractionLevel = UserInteractionLevels.INTERACT_WITH_ALL;
var dialog = app.dialogs.add();
dialog.name = "Tabellenformat der Auswahl zuweisen";
var dialogCol = dialog.dialogColumns.add();
var dialogText = dialogCol.staticTexts.add();
dialogText = "Wählen Sie ein Tabellenformat aus:";
var dropDownListe = dialogCol.dropdowns.add();
dropDownListe.stringList = app.activeDocument.tableStyles.everyItem().name;
var zeigeDialog = dialog.show();
if (zeigeDialog && dropDownListe.selectedIndex > -1 && app.selection.length == 1) {
var ausgewaehltesTabellenFormat = app.activeDocument.tableStyles[dropDownListe.selectedIndex].name;
}
dialog.destroy();

//Spaltenbreiten werden übertragen
for (var i = 0; i < alleObjekte.length; i++) {
for (var k = 0; k < alleObjekte[i].tables.length; k++) {
if (alleObjekte[i].tables[k].appliedTableStyle.name == ausgewaehltesTabellenFormat) {
var tab2 = alleObjekte[i].tables[k];
var anzahlKolumnenTab2 = tab2.columns.count();
var kolumnenAnzahlMin = Math.min(anzahlKolumnenTab1,anzahlKolumnenTab2) ;
var kolumnennummer = 0;
for (kolumnennummer = 0; kolumnennummer < kolumnenAnzahlMin; kolumnennummer ++ ) {
tab2.columns[kolumnennummer].width = aSpaltenbreitenTab1[kolumnennummer]*1;
}
}
}
}


Viele Grüße
Karsten

PS: 1000 Dank an Gregor für sein super Buch ;-)
...
Karsten Geisler
30. Mär 2012, 18:01
Tabellenbreite proportional skalieren
Hallo Gerald,

aus aktuellem Anlaß (weil ich's grad selbst so brauche), habe ich in Deinem Skript eine kleine Modifikation gemacht:

Wenn die Tabelle in einem Textrahmen platziert ist, wird im Dialogfeld die Breite des Textrahmens als Ziel für die Gesamtbreite der Tabelle vorgeschlagen.

Andernfalls (z.B. wenn die Tabelle in einer Tabellenzelle platziert ist) wird weiterhin, wie in Deinem Skript, die aktuelle Tabellenbreite eingeblendet.

Code
bGoOn = true; 
aTable = app.selection[0];
if (aTable.constructor.name != "Table") {
aTable = aTable.parent;
if (aTable.constructor.name != "Table") {
aTable = aTable.parent;
if (aTable.constructor.name != "Table") {
alert("Es muss ein Text in einer Zelle markiert sein");
bGoOn = false;
}
}
}
if (bGoOn) {
nc = aTable.columns.length;
tWidth = 0.0;
for (n=0; n < nc; n++) {
tWidth += aTable.columns[n].width;
}
// die Tabelle befindet sich in einem Textrahmen
if (aTable.parent.constructor.name == "TextFrame") {
tfBounds = aTable.parent.geometricBounds;
// vorgeschlagener Wert für die Gesamtbreite der Tabelle = Breite des Textrahmens
myValue = tfBounds[3] - tfBounds[1];
}
else {
// vorgeschlagener Wert für die Gesamtbreite der Tabelle = aktuelle Tabellenbreite
myValue = tWidth;
}
var myDialog = app.dialogs.add({name:"Tabellenbreite"});
with(myDialog.dialogColumns.add()){
var nuWidthField = measurementEditboxes.add({editValue:(2.83465 * myValue), editUnits:MeasurementUnits.millimeters, smallNudge:0.5});
}

var myResult = myDialog.show();
if(myResult == true){
var nuWidth = nuWidthField.editValue * 0.35278;
myDialog.destroy();
scaleClm = nuWidth / tWidth;
for (n=0; n < nc; n++) {
aTable.columns[n].width = scaleClm * aTable.columns[n].width;
}
}
else{
myDialog.destroy();
}
}

...
Martin Fischer
17. Sep 2007, 09:25
Hier Klicken

Aktuell

Veranstaltungskalender

Hier können Sie Ihre Anlässe eintragen, welche einen Zusammenhang mit den Angeboten von HilfDirSelbst.ch wie z.B. Adobe InDesign, Photoshop, Illustrator, PDF, Pitstop, Affinity, Marketing, SEO, Büro- und Rechtsthemen etc. haben. Die Einträge werden moderiert freigeschaltet. Dies wird werktags üblicherweise innert 24 Stunden erfolgen.
pdf-icon Hier eine kleine Anleitung.

Veranstaltungen
17.09.2019

Frankfurt/M
Dienstag, 17. Sept. 2019, 09.30 Uhr

Schulung, Seminar

Freisteller zählen seit den Anfangsjahren der elektronischen Bildbearbeitung zu den wichtigsten EBV-Techniken. Im Lauf der Jahre haben sich verschiedene Techniken entwickelt, und auch Photoshop hat mit zahlreichen Freistell-Werkzeugen die Arbeit mit Freistellern vereinfacht. In diesem Seminar lernen Sie die wichtigsten Freistell- und Maskierungstechniken kennen, um Ihre Bilddaten schnell und effizient freizustellen.

Ja

Organisator: Cleverprinting.de

https://www.cleverprinting.de/schulung-freistellen-tipps-und-tricks/

Freistellen – die besten Strategien, Tipps, Tricks
Veranstaltungen
17.09.2019 - 18.09.2019

Tag 1: Freistellen, Tag 2: Composing

Frankfurt/M
Dienstag, 17. Sept. 2019, 09.30 Uhr - Mittwoch, 18. Sept. 2019, 17.30 Uhr

Schulung, Seminar

Digitalfotos gekonnt aufbereiten, Produktfotos effizient freistellen, hochwertige Composings erstellen – für jede Anforderung bietet Photoshop ein Fülle von Werkzeugen und Techniken. Unserer zweitägige Schulung zeigt Ihnen ein Fülle von Arbeitstechniken, Tipps und Tricks. Eine Top-Schulung, die in den vergangenen Jahren fast immer ausgebucht war!

Ja

Organisator: Cleverprinting.de

https://www.cleverprinting.de/weiterbildung-zum-photoshop-composing-experten/

Weiterbildung zum Photoshop-Composing-Experten