I can select the first cell like this:
nb = CreateDocument[{a, b, c}, WindowTitle -> "Other"];
SelectionMove[nb, Next, Cell]
But how to select the first and the second cell?
$\begingroup$
$\endgroup$
4
-
5$\begingroup$ closely related: Programmatically selecting non adjacent Cells $\endgroup$– KubaCommented Sep 21, 2016 at 18:42
-
$\begingroup$ @Kuba Little complex.Thanks :) $\endgroup$– yodeCommented Sep 21, 2016 at 18:49
-
$\begingroup$ @Kuba Maybe we can simulate lick Ctrl then move?? $\endgroup$– yodeCommented Sep 22, 2016 at 6:51
-
$\begingroup$ We can (30695) but you'd have to know where :) And as far as I'm concerned there is no way to do this withing MMA only, based on CellObject. $\endgroup$– KubaCommented Sep 22, 2016 at 7:04
Add a comment
|
2 Answers
$\begingroup$
$\endgroup$
Ah, now I recall why I emphasized "non adjacent" in Programmatically selecting non adjacent Cells
It is because you can select adjacent cells by mimicking what FE does when you use keyboard shortcuts:
Item[KeyEvent["Down", Modifiers -> {Shift}], "SelectNextLine"],-KeyEventTranslations.tr
So in our case:
Select the first cell for a set you want to select
Repeat token execution
SelectionMove[First @ Cells[], All, Cell]
FrontEndExecute @ FrontEndToken["SelectNextLine"]
$\begingroup$
$\endgroup$
3
You could create the Notebook with tags and later evaluate those. Notebooklocate also works with stored notebooks. Consider that the Cells maybe only are evaluateable if the type is set to "Input".
nb1 = CreateDocument[{Cell["a=2", "Input", CellTags -> "myTag"],
Cell["b"], Cell["c=3d", "Input", CellTags -> "myTag"]},
WindowTitle -> "myCreation"]
SetSelectedNotebook[nb1]
NotebookLocate["myTag"]
SelectionEvaluate[nb1]
-
$\begingroup$ No one said anything about evaluation :) $\endgroup$– KubaCommented Sep 22, 2016 at 10:32
-
$\begingroup$ Well, if one drops the last Part (SelectionEvaluate) it will only select the cells. I didn't thougth someone would only want to select severel cells without processing them. $\endgroup$– crxCommented Sep 22, 2016 at 11:03
-
$\begingroup$ I see, but one may want to delete them, or change a background. Maybe you are right but I'm afraid the question is more general, so e.g. OP may want to select cells 1,2, do something, and the select cells 1,3. $\endgroup$– KubaCommented Sep 22, 2016 at 11:06