[BM60]

Ну наконец-то, не мытьем, так катаньем, получилось.
На 2Д-модели.
И виды на ВЭ'ах, и масштабы, и надписи, и форматка.
И даже твердая копия.
Вот!

... Но это не значит, что мои вопросы иссякли.
То ли ишшшо будет...

[Rustaman]

Сообщение от gumel Есть какой-нибудь способ за одно действие сделать копию листа и поместить его в конец списка?

Ну конечно же есть) Правой кнопкой по вкладке листа->переместить/копировать->создать копию и переместить в конец

[gumel]

Сообщение от Rustaman Ну конечно же есть) Правой кнопкой по вкладке листа->переместить/копировать->создать копию и переместить в конец

Ну это же несколько действий:
1) пкм для вызова контекстного меню
2) лкм для выбора move or copy
3) лкм для выбора move to end
4) лкм для выбора create a copy
5) лкм для выбора ОК

Итого 5 кликов! Хотелось бы одним

[Rustaman]

Сообщение от gumel Ну это же несколько действий: 1) пкм для вызова контекстного меню 2) лкм для выбора move or copy 3) лкм для выбора move to end 4) лкм для выбора create a copy 5) лкм для выбора ОК Итого 5 кликов! Хотелось бы одним

Макрос сделайте тогда

[gumel]

Сообщение от Rustaman Макрос сделайте тогда

И какая команда для этого?

[Rustaman]

Сообщение от gumel И какая команда для этого?

"РЛИСТ"

[Boxa]

Сообщение от gumel Есть какой-нибудь способ за одно действие сделать копию листа и поместить его в конец списка?

зажав лкм переместить лист в конец списка, одновременно зажав контрл.

[Бим]

Сообщение от berstrider Не тут то было

Снобизм это не хорошо. Лист нужен не всем и не всегда, что вроде не тайна. Да и чертёж лишь выражение инженерного решения, где не видно из каких оно пространств... А с черчением, даже простым, у многих не очень хорошо, хоть вспоминая школьное или начерталку. Не все могут вечерами в компе висеть или учебники зубрить, даже при желании, не говоря о интересах... А нынче-то и вовсе Автокад и подобное не единственное солнце в окошке и порой без него обойтись можно.

[Rustaman]

Сообщение от Boxa зажав лкм переместить лист в конец списка, одновременно зажав контрл.

Воу воу воу)) Век живи век учись) Спасибо за фишку) Не слышал о таковой, пригодится и мне тоже

[Dinoxromniy]

Сообщение от gumel Итого 5 кликов! Хотелось бы одним

gumel, на VBA это будет выглядеть приблизительно так (не уверен на счет русской локализации):

Код:

[Выделить все]

Sub layot2end()
Dim strName As String, i As Long
If ThisDrawing.ActiveLayout.TabOrder > 0 Then
   strName = ThisDrawing.ActiveLayout.name
   For i = 0 To ThisDrawing.Layouts.count - 1
   If ThisDrawing.Layouts.Item(i).name = strName & "_1" Then Exit Sub
   Next i
   ThisDrawing.SendCommand "_layout _copy" & vbCr & strName & vbCr & strName & "_1" & vbCr
   ThisDrawing.Layouts.Item(strName & "_1").TabOrder = ThisDrawing.Layouts.count - 1
   ThisDrawing.ActiveLayout = ThisDrawing.Layouts.Item(strName & "_1")
End If

End Sub

Offtop:

Сообщение от Rustaman Не слышал о таковой, пригодится и мне тоже

Забавно, что в экселе про копирование листов через перетаскивание с контролом знают многие, а вот что когда листов много и их ярлычки не умещаются на экране, то можно щелкнуть правой кл. мыши и получается перечень весь вкладок - аналогично как в автокаде - и можно выбрать нужную, почему-то знают редко. Ну и плюс в экселе щелчок лкм+контрол на стрелке перемещения между листами перематывает сразу соответственно на первый или последний лист рабочей книги. Видимо, не все работают в экселе с большим количеством листов.

[Хмурый]

Rustaman, тут всё это есть, только никто не смотрит
https://forum.dwg.ru/showthread.php?t=141

[Rustaman]

Сообщение от Хмурый Rustaman, тут всё это есть, только никто не смотрит Tips&Tricks (СОВЕТЫ ПРОФИ)

Не открывается ссылка(

[Бим]

Сообщение от Rustaman Не открывается ссылка(

Тема пришита в начале раздела

[Dinoxromniy]

Rustaman, https://forum.dwg.ru/showthread.php?t=141

[Кулик Алексей aka kpblc]

Сообщение от Rustaman Не открывается ссылка(

Исправил

[gumel]

Сообщение от Boxa зажав лкм переместить лист в конец списка, одновременно зажав контрл.

Отлично! Спасибо!