Jump to content
News Ticker
  • Welcome to the Community
  • Use the forum to troubleshoot your Excel & VBA Problems
  • We will be launching a new website soon! www.ExcelWTF.com/Learn ! Join us to learn VBA from the ground up!

All Activity

This stream auto-updates     

  1. Yesterday
  2. Brendalex

    SEO студия

    Приветствую Вас! Наша команда интернет-маркетологов занимается продвижением проектов в интернете с нуля, а также аутсорсингом, в портфолио есть: спортивные и бизнес школы, торговые центры, лагеря, спорт журналы, онлайн-порталы, отели, гостиницы, известные бренды и дистрибьютеры. Мы сделали известными уже более сотни интернет-проектов. Рекламировали известные мероприятия, а также раскрутили множество популярных сайтов и сообществ. Мы оказываем веб-услуги: - раскрутка и продвижение сообществ в cоциальных сетях; - продвижение сайтов в поисковых системах; - контекстная и таргетинговая реклама в соцсетях; - разработка и создание лендингов "под ключ"; - разработка лого, фирменного стиля и веб-дизайна; - поддержка сообществ и сайтов; - создание; вирусного нейминга; - E-mail и SMS маркетинг. Если ваш проект или компания требует комплексного продвижения - мы готовы вам помочь! На первый заказ для Вас действует бонус до 10% от нашего прайса! наши работы: в поисковиках ищите "веб лейбл" Фриланс: https://freelance.ru/weblabel Vkontakte: https://vk.com/weblabel_ru FaceBook: https://www.facebook.com/weblabel.ru Наши контакты: мейл: weblabel @ bk . ru (убрать пробелы и писать на эту почту) Skype: weblabel В поисковиках: веб-лейбл *По дополнительному запросу - отправим штатное КП, бриф и прайс.
  3. Добрый день! Наша команда интернет-маркетологов занимается продвижением проектов в интернете с нуля, а также аутсорсингом, в портфолио есть: спортивные и бизнес школы, онлайн-магазины, лагеря, спортивные журналы, онлайн-порталы, рестораны, гостиницы, известные бренды и дистрибьютеры. Мы сделали известными уже более сотни интернет-проектов. Рекламировали известные мероприятия, а также разработали множество популярных сайтов и сообществ. Мы предлагаем: - раскрутка и продвижение сообществ в cоциальных сетях; - продвижение сайтов в поисковой выдаче; - контекстная и таргетинговая реклама в соцсетях; - разработка и создание сайтов визиток "под ключ"; - разработка логотипов, фирменного стиля и веб-дизайна; - техническая поддержка сообществ и сайтов; - создание; креативного нейминга; - E-mail и SMS маркетинг. Если ваш проект или компания требует комплексного продвижения - мы готовы вам помочь! На первый заказ для Вас действует спецпредложение до 10% от нашего прайса! кейсы: в поисковиках ищите "веб лейбл" Профиль: https://freelance.ru/weblabel Vkontakte: https://vk.com/weblabel_ru FB: https://www.facebook.com/weblabel.ru Свяжитесь с нами: е-мейл: weblabel @ bk . ru (убрать пробелы и писать на эту почту) Скайп: weblabel В поиске: веб-лейбл *По дополнительному запросу - отправим штатное КП, бриф и прайс.
  4. Brendalex

    SMM агентство

    Приветствую! Наша команда интернет-маркетологов занимается продвижением проектов в интернете с нуля, а также аутсорсингом, в портфолио есть: спортивные и бизнес школы, онлайн-магазины, спорт лагеря, онлайн-журналы, онлайн-порталы, рестораны, гостиницы, известные бренды и дистрибьютеры. Мы сделали популярными уже более сотни интернет-проектов. Рекламировали известные мероприятия, а также продвинули множество популярных сайтов и сообществ. Мы предлагаем: - раскрутка и продвижение сообществ в cоциальных сетях; - продвижение сайтов в поисковых системах; - контекстная и таргетинговая реклама в соцсетях; - разработка и создание лендингов "под ключ"; - разработка логотипов, фирменного стиля и веб-дизайна; - аутсорсинг сообществ и сайтов; - создание; вирусного нейминга; - E-mail и SMS маркетинг. Если ваш проект или компания требует комплексного продвижения - мы готовы вам помочь! На первый заказ для Вас действует спецпредложение до 10% от нашего прайса! наши работы: в поисковиках ищите "веб лейбл" Фриланс: https://freelance.ru/weblabel Вконтакте: https://vk.com/weblabel_ru FB: https://www.facebook.com/weblabel.ru Свяжитесь с нами: мейл: weblabel @ bk . ru (убрать пробелы и писать на эту почту) Скайп: weblabel В поисковиках: веб-лейбл *По дополнительному запросу - отправим штатное КП, бриф и цены.
  5. Brendalex

    SEO студия

    Здравствуйте! Наша команда интернет-маркетологов занимается продвижением проектов в интернете с нуля, а также аутсорсингом, в портфолио есть: спортивные и бизнес школы, онлайн-магазины, спортивные лагеря, спорт журналы, онлайн-порталы, отели, гостиницы, известные бренды и дистрибьютеры. Мы сделали успешными уже более сотни интернет-проектов. Рекламировали известные мероприятия, а также создали множество популярных сайтов и сообществ. Мы делаем: - раскрутка и продвижение сообществ в соцсетях; - продвижение сайтов в поисковых системах; - контекстная и таргетинговая реклама в соцсетях; - разработка и создание лендингов "под ключ"; - разработка логотипов, фирменного стиля и веб-дизайна; - поддержка сообществ и сайтов; - создание; необычного нейминга; - е-мейл рассылки и SMS маркетинг. Если ваш проект или компания требует комплексного продвижения - мы готовы вам помочь! На первый заказ для Вас действует специальная скидка до 10% от нашего прайса! Портфолио: в поисковиках ищите "веб лейбл" На фрилансе: https://freelance.ru/weblabel Вконтакт: https://vk.com/weblabel_ru Фейсбук: https://www.facebook.com/weblabel.ru Свяжитесь с нами: e-mail: weblabel @ bk . ru (убрать пробелы и писать на эту почту) Skype: weblabel В поисковиках: веб-лейбл *По дополнительному запросу - отправим штатное КП, бриф и прайс.
  6. Brendalex

    SMM агентство

    Здравствуйте! Наша команда интернет-маркетологов занимается продвижением проектов в интернете с нуля, а также аутсорсингом, в портфолио есть: спортивные и бизнес школы, торговые центры, лагеря, спортивные журналы, онлайн-порталы, рестораны, гостиницы, известные бренды и дистрибьютеры. Мы сделали известными уже более сотни интернет-проектов. Рекламировали известные мероприятия, а также раскрутили множество популярных сайтов и сообществ. Мы делаем: - раскрутка и продвижение сообществ в соцсетях; - продвижение сайтов в поисковых системах; - контекстная и таргетинговая реклама в соцсетях; - разработка и создание сайтов визиток "под ключ"; - разработка логотипов, фирменного стиля и веб-дизайна; - поддержка сообществ и сайтов; - создание; необычного нейминга; - е-мейл рассылки и SMS маркетинг. Если ваш проект или компания требует комплексного продвижения - мы готовы вам помочь! На первый заказ для Вас действует бонус до 10% от нашего прайса! наши работы: в поисковиках ищите "веб лейбл" Фриланс: https://freelance.ru/weblabel VK: https://vk.com/weblabel_ru ФБ: https://www.facebook.com/weblabel.ru Свяжитесь с нами: e-mail: weblabel @ bk . ru (убрать пробелы и писать на эту почту) Скайп: weblabel В поиске ищите: веб-лейбл *По дополнительному запросу - отправим штатное КП, бриф и прейскурант.
  7. Brendalex

    SEO студия

    Приветствую! Наша команда интернет-маркетологов занимается продвижением проектов в интернете с нуля, а также аутсорсингом, в портфолио есть: спортивные и бизнес школы, магазины, спорт лагеря, онлайн-журналы, онлайн-порталы, отели, гостиницы, известные бренды и дистрибьютеры. Мы сделали известными уже более сотни интернет-проектов. Рекламировали известные мероприятия, а также продвинули множество популярных сайтов и сообществ. Мы делаем: - раскрутка и продвижение сообществ в cоциальных сетях; - продвижение сайтов в поисковиках; - контекстная и таргетинговая реклама в соцсетях; - разработка и создание лендингов "под ключ"; - разработка логотипов, фирменного стиля и веб-дизайна; - поддержка сообществ и сайтов; - создание; легкого нейминга; - почтовые рассылки и SMS маркетинг. Если ваш проект или компания требует комплексного продвижения - мы готовы вам помочь! На первый заказ для Вас действует скидка до 10% от нашего прайса! наше портфолио: в поисковиках ищите "веб лейбл" Профиль: https://freelance.ru/weblabel Вконтакте: https://vk.com/weblabel_ru FB: https://www.facebook.com/weblabel.ru Свяжитесь с нами: е-мейл: weblabel @ bk . ru (убрать пробелы и писать на эту почту) Skype: weblabel В поиске ищите: веб-лейбл *По дополнительному запросу - отправим штатное КП, бриф и прейскурант.
  8. on line drugs no prescription online pet pharmacy cheap viagra uk online no prescription/#on line drugs no prescription
  9. http://www.indiapharmacyonline.com/ online rx pharmacy medication onlinepharmacy/#no precription online pharmacy vote
  10. rx online pharmacy legit online phamary discounts best online no prescription viagra site/#online pharmacies in usa
  11. online pharmacy no prescription canadian pharm 365 review online pharmacies no prescription/#buy tramadol online no prescription
  12. buy medication without an rx online pharmacy #1 on line oharmacy/#trust pharmacy canadian
  13. online pharmacies in india buy tramadol online uk no prescription legal on line pharmacies/#canadianpharmacy/viagara
  14. Last week
  15. Earlier
  16. Hi, Recently I have Office 365 and also SharePoint with the new "Team Sites" environment (previously called workgroups). Anyhow, I have a macro which convert the excel sheet into pdf and puts this pdf in an email ready to send. This is the coding : sub sendPDF() Dim OutlookApp As Object Dim OutLookMailItem As Object Dim PdfFile As String, Title As String Dim myAttachments As Object ' Not sure for what the Title is Title = ActiveSheet.Range("D19") ' Define PDF filename PdfFile = ActiveWorkbook.FullName i = InStrRev(PdfFile, ".") If i > 1 Then PdfFile = Left(PdfFile, i - 1) ' PdfFile = PdfFile & "_" & ActiveSheet.Name & ".pdf" dit is voor tabbladnaam erbij te geven PdfFile = PdfFile & "_concerning_" & ActiveSheet.Range("D19") & ".pdf" ' hiermee wordt de naam van persoon in bestand opgenomen ' Export activesheet as PDF With ActiveSheet .ExportAsFixedFormat Type:=xlTypePDF, Filename:=PdfFile, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False End With ' Use already open Outlook if possible On Error Resume Next Set OutlApp = GetObject(, "Outlook.Application") If Err Then Set OutlApp = CreateObject("Outlook.Application") IsCreated = True End If OutlApp.Visible = True On Error GoTo 0 ' Prepare e-mail with PDF attachment With OutlApp.CreateItem(0) ' Prepare e-mail .Subject = "MPR " & ActiveSheet.Range("H16") .To = "[email protected]" ' <-- Put email of the recipient here .Body = "Dear, " .Attachments.Add PdfFile .Display End With End Sub The excel file is located in a sharepoint team site, as it was previously in a workgroup. When running this macro, the e-mail is being prepared but when the pdf must be attached, Outlook will show the pdf as attachment, but underneath the pdfname there is notification of "Download failed" . Then I have to doubleclick it, then a notification comes up with the text, " you don't have the correct authorization" with two options "Again" and "Delete" . If I click again, then the pdf will be attached... :-( . How can I fix this ? Thank you ! Sapron75
  17. Hey everybody! I was wondering if anyone could point me in the right direction on how to use an Excel macro to communicate with an external application. In this particular case I am wanting excel to basically copy and paste information from completed cells to a mainframe application. One with multiple screens. For example, let's say I was needing to make 30 accounts using the mainframe, and each account has specific fields that need to be filled in (Acct #, various sales codes etc.); I would like to make a spreadsheet with labelled columns for each specific field that needs to be filled in, the user could input all the necessary information for all the accounts in the spreadsheet, press a Run Macro button, and have the process run in the background saving loads of time wasted on very manual data entry. I'm assuming VBA would work for this... I do know the application we are using to access our mainframe (Microfocus RUMBA+) has the ability to run it's own internal macros as well, and there are a few very basic interactions it can perform "right out of the box" so to speak with Microsoft products (exporting screen data to excel etc.). I know something like this is definitely possible as I've seen it in previous workplaces with similar applications. Could the starting place be as simple as Set IE = CreateObject ("Rumba.application")? I'm guessing there are some simple solutions and a couple more advanced ones, and pros & cons to both. Any help would be greatly appreciated! Thank you, -Dane
  18. Caleeco

    Find, copy, paste, find again, repeat

    No worries, give me a shout if you need any help with the rest of the suite! Caleeco
  19. GeeperZ

    Find, copy, paste, find again, repeat

    Ah so simple! Thanks for your assistance. Now all I have to do is make the rest of the suite work and we'll be flying! Again, many thanks.
  20. Caleeco

    Find, copy, paste, find again, repeat

    Hi GeeperZ Thanks for sending over the file. I seem to have a website bug where the NOT (<>) symbol doesnt appear correctly in code samples. If you look at your TransposeData2 sub-routine, you'll see this line of code: Loop While rFound.Address = FirstAddress Change it to this: Loop While rFound.Address <> FirstAddress Tested on my end, seems to work. Let me know how you get on. Thanks Caleeco
  21. GeeperZ

    Find, copy, paste, find again, repeat

    Hey Caleeco, thanks for getting back to me. I'll email the file through. I'll have to strip out some info first but other than that it will be the same as what I'm working on.
  22. Caleeco

    Find, copy, paste, find again, repeat

    Hey GeeperZ Post #2 should be the last 'working' code we made. Has the sheet structure changed at all? Are you able to email me the sheet you're working on so I can do some code testing? Thanks Caleeco
  23. GeeperZ

    Find, copy, paste, find again, repeat

    Hey Caleeco, I'm being driven to resurrect this again. The project never got finished the first time around but as things have developed this has once again become of interest. Since I was last working on this I've had a new computer and I don't appear to have a working copy of the module. Any chance you could help? I've tried running the code as it appears on your forum but it does not work as expected, it gets to selecting the first instance and then Excel asks where I would like to paste the data. If I step into the macro and F5 it just returns the first result over again. I've looked on MrExcel too but no luck 😞
  24. OldFella

    Change Dr to Drive

    If you use Find & Select / Replace on the column that contains the addresses you should be able to replace St without problem. Replace recognizes spaces. I assume that your street names that begin with St. will not have a space before St, whereas Something St does have a space before St, so in Find what: you type " St" (without the quote marks but with a space before the S) and in Replace with: you type " Street" (again, without the quote marks but with a space before the S). That should fix the street names and leave names like St. Peter unchanged.
  25. RareNasturtium

    Change Dr to Drive

    Hey Everyone I have a spreadsheet with about 44,000 rows in it. The address column has short forms like Rd for Road and Dr for Drive. I'd like to convert all short forms. My problem is find and replace won't work on things like St without also affecting street names that start with St. Anyone have any suggestions on the best way to tackle this beast?
  26. OldFella

    How to extract data from PDF to Excel?

    Hi SyafiniAlias I had a similar requirement some time ago. Eventually I developed an easier way of getting the data, but while I was trying to get the data from a pdf file I was working through https://www.myengineeringworld.net/2012/07/vba-macro-to-open-pdf-file.html Have a look at that link - it may help you.
  27. OldFella

    Automated Table Updating + Dynamic Chart

    Hi Caleeco If/when you get around to this one, I've simplified it a little bit. After hours of trial and error I've managed to create coding that achieves a) Lock in the Current Data, so now it's only the three sub-wishes and the dynamic charting that are still confounding me. No doubt what took me hours would have taken you minutes, but at least I finally nutted it out so I'm happy.
  28. Hi, I have a problem. I want to copy all words that begin with “clr_” from pdf file. And save all the word that i had copy in an Excel file. Thanks.
  1. Load more activity
×