search

mltefive / docs

https://mltefive.github.io/docs/
1 stars 0 forks source link

Excel Macros #12

Open 7dir opened 4 years ago

7dir commented 4 years ago

Save sheets to each file

Sub Splitbook()

Dim xPath As String
xPath = Application.ActiveWorkbook.Path
Application.ScreenUpdating = False
Application.DisplayAlerts = False
For Each xWs In ThisWorkbook.Sheets
    xWs.Copy
    Application.ActiveWorkbook.SaveAs Filename:=xPath & "\" & xWs.Name & ".xlsx"
    Application.ActiveWorkbook.Close False
Next
Application.DisplayAlerts = True
Application.ScreenUpdating = True

End Sub
7dir commented 4 years ago

Динамики

for i in {28..43}; do echo "=СЦЕПИТЬ( C1;C$i;СИМВОЛ(10); D1;D$i;СИМВОЛ(10); E1;E$i;СИМВОЛ(10); F1;F$i;СИМВОЛ(10); G1;G$i;СИМВОЛ(10); H1;H$i;СИМВОЛ(10); I1;I$i;СИМВОЛ(10); J1;J$i;СИМВОЛ(10); K1;K$i;СИМВОЛ(10); L1;L$i;СИМВОЛ(10); M1;M$i;СИМВОЛ(10); N1;N$i;СИМВОЛ(10); O1;O$i;СИМВОЛ(10); P1;P$i;СИМВОЛ(10); )"; done

Микш пульты

for i in {2..3}; do echo "=СЦЕПИТЬ( C1;C$i;СИМВОЛ(10); D1;D$i;СИМВОЛ(10); E1;E$i;СИМВОЛ(10); F1;F$i;СИМВОЛ(10); G1;G$i;СИМВОЛ(10); H1;H$i;СИМВОЛ(10); I1;I$i;СИМВОЛ(10); J1;J$i;СИМВОЛ(10); K1;K$i;СИМВОЛ(10); L1;L$i;СИМВОЛ(10); M1;M$i;СИМВОЛ(10); N1;N$i;СИМВОЛ(10); O1;O$i;СИМВОЛ(10); P1;P$i;СИМВОЛ(10); Q1;Q$i;СИМВОЛ(10); R1;R$i;СИМВОЛ(10); S1;S$i;СИМВОЛ(10); U1;U$i;СИМВОЛ(10); V1;V$i;СИМВОЛ(10); W1;W$i;СИМВОЛ(10); X1;X$i;СИМВОЛ(10); Y1;Y$i;СИМВОЛ(10); Z1;Z$i;СИМВОЛ(10); AA1;AA$i;СИМВОЛ(10); AB1;AB$i;СИМВОЛ(10); AC;AC$i;СИМВОЛ(10) )"; done

for i in {42..43}; do echo "=СЦЕПИТЬ( C1;C$i;СИМВОЛ(10); D1;D$i;СИМВОЛ(10); E1;E$i;СИМВОЛ(10); F1;F$i;СИМВОЛ(10); G1;G$i;СИМВОЛ(10); H1;H$i;СИМВОЛ(10); I1;I$i;СИМВОЛ(10); J1;J$i;СИМВОЛ(10); K1;K$i;СИМВОЛ(10); L1;L$i;СИМВОЛ(10); M1;M$i;СИМВОЛ(10); N1;N$i;СИМВОЛ(10); O1;O$i;СИМВОЛ(10); P1;P$i;СИМВОЛ(10); Q1;Q$i;СИМВОЛ(10); R1;R$i;СИМВОЛ(10); S1;S$i;СИМВОЛ(10); U1;U$i;СИМВОЛ(10); V1;V$i;СИМВОЛ(10); W1;W$i;СИМВОЛ(10); X1;X$i;СИМВОЛ(10); Y1;Y$i;СИМВОЛ(10); Z1;Z$i;СИМВОЛ(10); AA1;AA$i;СИМВОЛ(10); AB1;AB$i;СИМВОЛ(10); AC1;AC$i;СИМВОЛ(10); )"; done

Мультикор

for i in {2..20}; do echo "=СЦЕПИТЬ( C1;C$i;СИМВОЛ(10); D1;D$i;СИМВОЛ(10); )"; done

НЧ Динамики for i in {2..16}; do echo "=СЦЕПИТЬ( C1;C$i;СИМВОЛ(10); D1;D$i;СИМВОЛ(10); E1;E$i;СИМВОЛ(10); F1;F$i;СИМВОЛ(10); G1;G$i;СИМВОЛ(10); H1;H$i;СИМВОЛ(10); I1;I$i;СИМВОЛ(10); J1;J$i;СИМВОЛ(10); K1;K$i;СИМВОЛ(10); L1;L$i;СИМВОЛ(10); M1;M$i;СИМВОЛ(10); N1;N$i;СИМВОЛ(10); )"; done

Селектор for i in {2..40}; do echo "=СЦЕПИТЬ( C1;C$i;СИМВОЛ(10); D1;D$i;СИМВОЛ(10); E1;E$i;СИМВОЛ(10); F1;F$i;СИМВОЛ(10); G1;G$i;СИМВОЛ(10); H1;H$i;СИМВОЛ(10); I1;I$i;СИМВОЛ(10); J1;J$i;СИМВОЛ(10); K1;K$i;СИМВОЛ(10); L1;L$i;СИМВОЛ(10); M1;M$i;СИМВОЛ(10); N1;N$i;СИМВОЛ(10); O1;O$i;СИМВОЛ(10); P1;P$i;СИМВОЛ(10); Q1;Q$i;СИМВОЛ(10); R1;R$i;СИМВОЛ(10); S1;S$i;СИМВОЛ(10); T1;T$i;СИМВОЛ(10); U1;U$i;СИМВОЛ(10); V1;V$i;СИМВОЛ(10); W1;W$i;СИМВОЛ(10); X1;X$i;СИМВОЛ(10); Y1;Y$i;СИМВОЛ(10); )"; done

Стойки

for i in {2..14}; do echo "=СЦЕПИТЬ( C1;C$i;СИМВОЛ(10); D1;D$i;СИМВОЛ(10); E1;E$i;СИМВОЛ(10); F1;F$i;СИМВОЛ(10); G1;G$i;СИМВОЛ(10); H1;H$i;СИМВОЛ(10); I1;I$i;СИМВОЛ(10); )"; done

Мониторы

for i in {2..24}; do echo "=СЦЕПИТЬ( C1;C$i;СИМВОЛ(10); D1;D$i;СИМВОЛ(10); E1;E$i;СИМВОЛ(10); F1;F$i;СИМВОЛ(10); G1;G$i;СИМВОЛ(10); H1;H$i;СИМВОЛ(10); I1;I$i;СИМВОЛ(10); J1;J$i;СИМВОЛ(10); K1;K$i;СИМВОЛ(10); L1;L$i;СИМВОЛ(10); M1;M$i;СИМВОЛ(10); N1;N$i;СИМВОЛ(10); O1;O$i;СИМВОЛ(10); P1;P$i;СИМВОЛ(10); Q1;Q$i;СИМВОЛ(10); R1;R$i;СИМВОЛ(10); )"; done

LED

for i in {2..45}; do echo "=СЦЕПИТЬ( C1;C$i;СИМВОЛ(10); D1;D$i;СИМВОЛ(10); E1;E$i;СИМВОЛ(10); F1;F$i;СИМВОЛ(10); G1;G$i;СИМВОЛ(10); H1;H$i;СИМВОЛ(10); I1;I$i;СИМВОЛ(10); J1;J$i;СИМВОЛ(10); K1;K$i;СИМВОЛ(10); L1;L$i;СИМВОЛ(10); M1;M$i;СИМВОЛ(10); N1;N$i;СИМВОЛ(10); O1;O$i;СИМВОЛ(10); P1;P$i;СИМВОЛ(10); Q1;Q$i;СИМВОЛ(10); R1;R$i;СИМВОЛ(10); S1;S$i;СИМВОЛ(10); U1;U$i;СИМВОЛ(10); V1;V$i;СИМВОЛ(10); W1;W$i;СИМВОЛ(10); X1;X$i;СИМВОЛ(10); Y1;Y$i;СИМВОЛ(10); Z1;Z$i;СИМВОЛ(10); AA1;AA$i;СИМВОЛ(10); AB1;AB$i;СИМВОЛ(10); AC1;AC$i;СИМВОЛ(10); AD1;AD$i;СИМВОЛ(10); )"; done

for i in {45..46}; do echo "=СЦЕПИТЬ( C1;C$i;СИМВОЛ(10); D1;D$i;СИМВОЛ(10); E1;E$i;СИМВОЛ(10); F1;F$i;СИМВОЛ(10); G1;G$i;СИМВОЛ(10); H1;H$i;СИМВОЛ(10); I1;I$i;СИМВОЛ(10); J1;J$i;СИМВОЛ(10); K1;K$i;СИМВОЛ(10); L1;L$i;СИМВОЛ(10); M1;M$i;СИМВОЛ(10); N1;N$i;СИМВОЛ(10); O1;O$i;СИМВОЛ(10); P1;P$i;СИМВОЛ(10); Q1;Q$i;СИМВОЛ(10); R1;R$i;СИМВОЛ(10); S1;S$i;СИМВОЛ(10); U1;U$i;СИМВОЛ(10); V1;V$i;СИМВОЛ(10); W1;W$i;СИМВОЛ(10); X1;X$i;СИМВОЛ(10); Y1;Y$i;СИМВОЛ(10); Z1;Z$i;СИМВОЛ(10); AA1;AA$i;СИМВОЛ(10); AB1;AB$i;СИМВОЛ(10); AC1;AC$i;СИМВОЛ(10); AD1;AD$i;СИМВОЛ(10); )"; done

AC

for i in {2..66}; do echo "=СЦЕПИТЬ( C1;C$i;СИМВОЛ(10); D1;D$i;СИМВОЛ(10); E1;E$i;СИМВОЛ(10); F1;F$i;СИМВОЛ(10); G1;G$i;СИМВОЛ(10); H1;H$i;СИМВОЛ(10); I1;I$i;СИМВОЛ(10); J1;J$i;СИМВОЛ(10); K1;K$i;СИМВОЛ(10); L1;L$i;СИМВОЛ(10); M1;M$i;СИМВОЛ(10); N1;N$i;СИМВОЛ(10); O1;O$i;СИМВОЛ(10); P1;P$i;СИМВОЛ(10); Q1;Q$i;СИМВОЛ(10); R1;R$i;СИМВОЛ(10); S1;S$i;СИМВОЛ(10); U1;U$i;СИМВОЛ(10); V1;V$i;СИМВОЛ(10); W1;W$i;СИМВОЛ(10); X1;X$i;СИМВОЛ(10); Y1;Y$i;СИМВОЛ(10); Z1;Z$i;СИМВОЛ(10); AA1;AA$i;СИМВОЛ(10); AB1;AB$i;СИМВОЛ(10); AC1;AC$i;СИМВОЛ(10); AD1;AD$i;СИМВОЛ(10); )"; done

Коммутация и коннет соединения

for i in {2..96}; do echo "=СЦЕПИТЬ( C1;C$i;СИМВОЛ(10); D1;D$i;СИМВОЛ(10); E1;E$i;СИМВОЛ(10); F1;F$i;СИМВОЛ(10); G1;G$i;СИМВОЛ(10); H1;H$i;СИМВОЛ(10); I1;I$i;СИМВОЛ(10); J1;J$i;СИМВОЛ(10); )"; done

Радиосистемы

for i in {2..25}; do echo "=СЦЕПИТЬ( C1;C$i;СИМВОЛ(10); D1;D$i;СИМВОЛ(10); E1;E$i;СИМВОЛ(10); F1;F$i;СИМВОЛ(10); G1;G$i;СИМВОЛ(10); H1;H$i;СИМВОЛ(10); I1;I$i;СИМВОЛ(10); J1;J$i;СИМВОЛ(10); K1;K$i;СИМВОЛ(10); L1;L$i;СИМВОЛ(10); M1;M$i;СИМВОЛ(10); N1;N$i;СИМВОЛ(10); O1;O$i;СИМВОЛ(10); P1;P$i;СИМВОЛ(10); Q1;Q$i;СИМВОЛ(10); R1;R$i;СИМВОЛ(10); S1;S$i;СИМВОЛ(10); U1;U$i;СИМВОЛ(10); V1;V$i;СИМВОЛ(10); W1;W$i;СИМВОЛ(10); X1;X$i;СИМВОЛ(10); Y1;Y$i;СИМВОЛ(10); Z1;Z$i;СИМВОЛ(10); AA1;AA$i;СИМВОЛ(10); AB1;AB$i;СИМВОЛ(10); AC1;AC$i;СИМВОЛ(10); AD1;AD$i;СИМВОЛ(10); AE1;AE$i;СИМВОЛ(10); AF1;AF$i;СИМВОЛ(10); AG1;AG$i;СИМВОЛ(10); AH1;AH$i;СИМВОЛ(10); AI1;AI$i;СИМВОЛ(10); AJ1;AJ$i;СИМВОЛ(10); AK1;AK$i;СИМВОЛ(10); AL1;AL$i;СИМВОЛ(10); AM1;AM$i;СИМВОЛ(10); AN1;AN$i;СИМВОЛ(10); AO1;AO$i;СИМВОЛ(10); )"; done

Усилители мощности

for i in {2..45}; do echo "=СЦЕПИТЬ( C1;C$i;СИМВОЛ(10); D1;D$i;СИМВОЛ(10); E1;E$i;СИМВОЛ(10); F1;F$i;СИМВОЛ(10); G1;G$i;СИМВОЛ(10); H1;H$i;СИМВОЛ(10); I1;I$i;СИМВОЛ(10); J1;J$i;СИМВОЛ(10); K1;K$i;СИМВОЛ(10); )"; done

Каналы: Канал EQ: MIC AUX выход: Выходная мощность: Выходная мощность: Потребляемая мощность: Группа баз: Сопротивление: Частотный диапазон: Эквалайзер общий: Моно дорожка: Стерео дорожки: USB, звуковая карта: Bluetooth: USB: фейдеррегулятор: фейдеррегулятор: Аудио интерфейс: Фантомное питание: Эффекты: Отношение сигнал/шум: КНИ: Размеры: Вес: Гарантийный срок:

7dir commented 4 years ago

https://www.experts-exchange.com/articles/8269/Convert-between-Excel-file-formats-XLS-XLSX-XLSM-with-without-macro-option.html