Sub CombineWorkbooks()
Dim FilesToOpen
Dim x As Integer
Application.ScreenUpdating = False 'отключаем обновление экрана для скорости
'вызываем диалог выбора файлов для импорта
FilesToOpen = Application.GetOpenFilename _
(FileFilter:="All files (*.*), *.*", _
MultiSelect:=True, Title:="Files to Merge")
If TypeName(FilesToOpen) = "Boolean" Then
MsgBox "Не выбрано ни одного файла!"
Exit Sub
End If
'проходим по всем выбранным файлам
x = 1
While x <= UBound(FilesToOpen)
Set importWB = Workbooks.Open(Filename:=FilesToOpen(x))
Sheets().Copy After:=ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count)
importWB.Close savechanges:=False
x = x + 1
Wend
Application.ScreenUpdating = True
End Sub
onclick="gtag('event', 'Произвольное название события', { 'event_category': 'forms', 'event_action': 'action-1-1', });"Начиная с 1 октября 2017 года все новые аккаунты созданные в сервисе Google Analytics работают через код отслеживания Global Site Tag (gtag.js). В связи с чем и изменился подход в настройке некоторых целей и событий, и в установке самого кода отслеживания.
sudo apt-get install php5-mcrypt➜ ~ cat /etc/php5/mods-available/mcrypt.ini
; configuration for php MCrypt module
; priority=20
extension=mcrypt.sosudo php5enmod mcrypt
VLOOKUP("Слово или значение из ячейки с выпадающим списком";'Лист1'!A$2:B$21;2;FALSE)=VLOOKUP(D2;'Значения'!A$2:B$21;2;FALSE)&"-"&VLOOKUP(G2;'Значения'!E$2:F$29;2)&"-"&IF(IF(A2 >= 100;TRUE;FALSE);A2;IF(A2 >= 10; CONCAT("0";A2);CONCAT("00";A2)))
<script>
document.addEventListener( 'wpcf7mailsent', function( event ) {
location = '/file.pdf';
}, false );
</script>
i.imgur.com/KTl7iJx.png
RewriteEngine On
RewriteCond %{HTTPS} =off
RewriteRule (.*) https://%{HTTP_HOST}%{REQUEST_URI} [QSA,L]RewriteEngine On
RewriteCond %{SERVER_PORT} !^443$
RewriteRule .* https://%{SERVER_NAME}%{REQUEST_URI} [R,L]RewriteEngine On
RewriteCond %{HTTPS} off
RewriteCond %{HTTP:X-Forwarded-Proto} !https
RewriteRule ^(.*)$ https://%{HTTP_HOST}%{REQUEST_URI} [L,R=301]