I want the same affect as copy a table and pasting into the email. So i guess i need to copy a range and save as html in a string. It seems like it would be simple since its just copy and paste into the email, but i've been unable to find anyting on it.
View 3 RepliesSo I have (some sort of standard) code to generate a Html emailbody.
Problem is I have data and on this data there is a chart.
Now when I copy and paste the range of these 2 sections it only gives me the data but not the chart (leaves that space blank).
How I can adjust this code so it also will paste the chart?
This is the code :
[Code] .....
I am attempting to navigate to a webpage using IE. I have been successful at getting to the appropriate webpage.
However, I would like to open a link within the webpage in the browser in another window(Which is an image). Copy the image then paste it back into excel. I have been successful at opening the webpage using a Userform.
Code:
Sub Anthro()
Application.ScreenUpdating = False
Set ie = CreateObject("InternetExplorer.Application")
With ie
.Visible = True
[Code] .......
The user input number for example:
If the user inputs the number 25423310 into the txtbox then it navigates to a certain webpage.
On this webpage and all other webpages where different #'s are used are very similar. The number (25423310) is always used to identify an image. However it has more characters. For example the image is always on line 30 of the HTML code. On this example the HTML code lists the image as:
The number used in the txtbox to naviagete to the URL Ex: 25423310) is always within line 30 of code in HTML. Is it possible to run a query or parse this line of code and direct ie to open this image in a new window then copy and paste it based on the criteria of the user input? Ex. 25423310?
Code:
Sub PropInfo()
Dim appIE As SHDocVw.InternetExplorer
Set appIE = New SHDocVw.InternetExplorer
Dim varTables, varTable
[Code] ....
I have a folder containing 40 single sheet excel workbooks and I would like to automate following tasks:
- Open each excel file (need to open the file so as to update it since it gets the data from another workbook through =formulas)
- Copy paste as values
- Save this as excel html in the same folder as original excel files (keeping the original file name)
- Close (original excel file should not be changed ie formulas should remain in place, only the html file will contain values)
- Since there will always be xHtml files with same name need the macro to replace the excisting file
My abilities with excel are limited to functions, no VBA knowledge other than finding ready codes and pasting them in the module.
Since this routine is to be run almost daily the macro should run all files, instead of one by one.
I just hope that I am not asking too much for excel to handle and I hope that explanation is clear.
I have a range which has conditional formats based on other cells. I want to copy this range into another sheet and retain the current formats as fixed formats without copying the conditional formulae. ideally in VBA.
View 5 Replies View RelatedI'm trying to format my email generated of excel sheet to have an HTML formal before they are sent out using MS Outlook.
I have googled, searched your forums and also tried to figure out a solution with the existing helps on the internet. I need help on how to format emails genarated out of my excel sheet. I know a bit of HTML syntax but a newbie to VBA. I'm guessing the formatting has to be done in the Emailbody text function in my code.
I'm also trying to understand the logic behind the code and also learning excel vba bit by bit at the minute.
I'm working on a Excel template where 6 cells are filled with text. Now I want to put all the text in those cells into one 'result cell'. I already know how to put the cell values into strings and paste them beneath each other.
My problem is that I don't only want to copy the cell values but also the formatting, because all of the separate cells have a bold title. If I only copy the values the formatting isn't copied with it, so my question is:
How do I copy the cell formatting (bold titles) with it or how can I make a string bold?? Beneath is my code:
[Code] ....
There are two problems to solve :
My Excel workbook is composed of 2 sheets. The first one is a Dashboard (Sheet1) and the second one (Sheet13) is where the data is.
I would like to press a button on the first one, enter the text to be found into an Inputbox and then copy-paste cells from the second sheet (containing the data) into the first one.
The data is structured in rows, from A to V columns.
I would like, according the row where is located the found cell, copy given given cells from Sheet13 to Sheet1.
Right now, I have a macro performing the search like desired and selecting the found cell :
Code:
Private Sub CommandButton1_Click() Dim FindString As String
Dim Rng As Range
FindString = InputBox("Entrer le contrat de support - rechercher (DSI....) ")
If Trim(FindString) "" Then
With Sheet13.Range("V:V")
Set Rng = .Find(What:="*" & FindString & "*", _
[Code] .......
I would like to copy cells located in the columns A, B, D, E, F, K, S, (T:U) from the row where the searched string has been found in Sheet13. It has to be copied on Sheet1, on two rows : (N29:Q29) & (N30:Q30).
When a new research is done, the previously copied cells should be cleared out.
2. The second point is about duplicating a button with an associated macro. The macro is running like I want but I have to insert 299 more buttons, with the updated formula according to the row where it is located.
However, one part of the macro has to stay the same because all of these 300 buttons increment a single counter located on Sheet1.
Code:
Sub Button2600_Click() If MsgBox("Etes-vous sûr de vouloir ajouter 1 année de support pour" & vbNewLine & Range("E7") & " " & "(" & Range("F7") & ")" & " ?", vbYesNo + vbQuestion, "Modification du Contrat de Support") = vbYes Then
Sheet13.[A7] = DateAdd("yyyy", 1, [A7])
MsgBox "Contrat étendu d'une année."
Dim x As Integer
x = Sheet1.[R11].Value
Sheet1.[R11].Value = x + 1
End If
End Sub
You can get the excel workbook at the following link : [URL] ....
This follows on from my previous posting [URL] ..... which produced a solution using an ActiveX Combobox that unfortunately does not work on Mac PCs!
I tried to replace the ActiveX with a Form Control Combobox but could not make it work.
So I am trying to use the alternative of "find, copy and paste" the relevant information.
As shown on the attached 140207 FINDALL test.xlsm, I need to find all records containing whatever string is entered into the "Search" cell, and copy data form three columns onto the Entry sheet.
The User will then select whichever of the entries they want to use, which will populate the relevant cells.
Problem: The following Code is not recognising any of the data in the Column being searched.
VB:
Option Explicit
Sub FINDPARTS()
Dim ws As Worksheet, i As Integer, k As Integer, z As Integer, CL, myFind, CHOICE As Range, lr As String, lrG As String,
[Code] ......
I have been trying to set up this macro to copy and paste rows where a tick box is checked. The macro needs to transfer the row A:H over to sheet 2 then insent the data acording to property title either A, B, C etc. into formated tables which then feed into a bar and pie chart. I have tried posting this question up in sections hoping that i could get the bits of code i need and then work out how to do the macro but I have had no luck since my VBA skills are poor. I have attached the file
Private Sub CommandButton1_Click()
Dim lRow As Long, lRow1 As Long, lRow2 As Long
Dim Target As Range
Dim vTemp As Variant
Dim WS2 As Worksheet
Set WS2 = Sheets("Sheet2")
lRow = WS2.UsedRange.Row + WS2.UsedRange.Rows.Count
For Each Target In Range("I1", Cells(Rows.Count, "I").End(xlUp).Address).SpecialCells(xlCellTypeConstants)
vTemp = Target.Value
If VarType(vTemp) = vbBoolean Then
If vTemp = True Then
vTemp = "*"
On Error Resume Next
vTemp = WorksheetFunction.Match(" Total*", Range("A" & Target.Row, "A" & Rows.Count), 0).....................
I've recently switched from office 2003 to office 2007.
In excel 2003 I was able to paste html into excel for easy editing. In excel 2007, when I paste the html I see auto-formatted web page objects. How can I disable this and get just straight text?
I tried formatting the cells to be plain text and then pasting.
I have this code that copy/pastes a range from another sheet for every nth row. In the code I have pasted cells I need to merge the cell with the cell to the right and format it. I thought I was doing ok but the code keeps returning an error (run-time 1004) and I don't know the solution, it is beyond my level of VBA.
Code:
Sub test()
Dim ws1 As Worksheet
Dim ws2 As Worksheet
Dim lngRowCounter As Long
Dim newRowCounter As Long
[Code] ...
The code in red is the problem and I have commented it out so it can run, but I need it to merge and format. I don't know how to address range/cells in column B and C together (they are the two cells I wish to merge and format).
the date I want to copy paste is in [dd/mm/yyyy] format in a single cell.
I want to isolate the [dd], [mm] and [yyyy] and write them down in 3 different cells. How can I do this?
I have a range of cells that is 10 rows high. I want to copy and paste this range 11 times while identifying each of the 11 copies of the range, such as; 02,03,04...12.
Please see attachment for an example of what I am trying to do.
Does anyone have an idea of how this might be done in VB?
Is it possible to have a macro copy a range of cells (A1:K1) and place it in the next empty row? My first row has formulas in it to grab information from a separate sheet within the same workbook with special formatting so I can import it to another program. What I want to be able to do is take that first row, use my macro button to copy and paste (only text, not the formulas) the information into row 2, then when the information changes in row 1 with new information (from the other sheet) it will copy and paste the new information into row 3 and so on.
View 6 Replies View RelatedI have this export containing HTML content in each cell. I need to filter out a specific code from the links included in the HTML.
HTML Code:
<some HTML>
<a href="http://site.com/content/GE6053" class="button"><span>Text</span></a>
<a href="http://site.com/content/GE123" class="button"><span>Text</span></a>
<some HTML>
I need to get the string GE#### before each " class="button"> and copy it on a cell on the right. There are other links of this format [URL] ..... in the cell, but I am interested only the ones that have " class="button"> after it.
The length of the ID after GE can be 2, 3, 4 or 6 characters long. But I am ok with getting GE + 6 characters following it as that means I would get something like GE12" cl and I will delete the extra character by doing a find/replace.
I'm exporting a csv file from a membership database with the attendance of members. With a macro i open the file and copy the contend to excel. With the macro the column for the date has *randomly* wrong formats. Example the date in column B:
Aasia Tallah19-03-2009 19:33
Aasia Tallah17/03/09 7:49 pm
Aasia Tallah15/03/09 7:53 pm
Aasia Tallah14/03/09 6:34 pm
Aasia Tallah03-12-2009 20:05
Aasia Tallah03-11-2009 19:56
Aasia Tallah03-10-2009 19:54
I try to change the format of the column, but that does not work. Rows 2,3 and 4 seem to be text but they are not. If i access the edit bar for example the 17th of march and store without changing anything, it changes to the format of the first row. That is how i want it. If i copy the column by hand, every thing is fine.
All of the following i tryed:
- format date column of the csv before copying... failed
- copy special with only pasting values... failed
- preformat the column i paste the date to... failed
- delete the sheet i paste to and create a new one... failed
- copy the macro to a new workbook... failed
I am doing a Regular Expression search on a string variable assigned to the HTML content of a Wikipedia search. However I am currently manually going to Wikipedia, searching for the term, saving the html page, opening the saved page with Notepad and then copying the content into a cell.
Can the above process be automated with VBA, how to assign the html content of a Wikipedia search to a string variable.
How to copy paste data as a relationship table.
In attached workbook...when user will click on "Relate" button on "rawdata" sheet....then data should be visible in same form as showing in "relate" sheet...
Book2.xls
I'm trying to make a script that will copy and paste a row in a table underneath the last row in that table when a button is clicked. I've simply recorded a macro to get things rolling, however whenever the macro does an insert to paste the data it goes above the last new entry which doesn't work for my purposes,
View 14 Replies View RelatedI am creating a simple IF function. that says IF cell (cell name) = 2007 then copy and special paste values from these cells into this location...I am not entirely sure how this should be set up.
View 2 Replies View RelatedIf it is possible to do, how do I change this message format to html so that I can paste an image into the message?
View 5 Replies View RelatedI have a very complicated table that has a bunch of links to other cells on the sheet. I would like to duplicate this table onto another sheet in my workbook. However, when I try to do that, the links also change when I paste it on the new sheet. Is there a way I can keep all of the links to the original page after I have pasted the table on the new sheet?
View 4 Replies View RelatedWhat I have is a table of employees names, which site they work at and a comment.
I have a table on another sheet with the addresses of all our sites.
What I need is a macro which will:
>look at the active selection
>copy their name(sheet 1, row B) & comment (sheet 1, row G)
>look up the site they work at (sheet 1, row D)
>copy the relevant address (sheet 3)
>paste the name and addresses into different sheet
>paste the comments into another sheet
This will be used to make printable labels for letters that we post out to employees. They will need to be split up so each name and address is printed on a different label.
The comments will be printed onto letters which will have a headers which is the same for everyone, but would be nice if they could be personalised with the comments of their managers and perhaps their names (something like "Hi John, you have been selected by your manager for your great work, please find enclosed your badge. Jeff's comments: "Comment 1""). But this part is a nice extra, the important part is the address labels.
I have a tab with several small tables (Column E-G). What I need to do is to copy them as pictures, move them to another tab, change the picture size, and align them in the new tab.
The data set is huge and it would involve lots of labor if copy and paste one by one. Is there any way to do it using a macro? I tried to record a macro, but it doesn't work. It will not change the size of the picture and I don't know how to tell Excel to align them the way I want.
What I would like a macro to do is take information from cells A1 to P1 on sheet1 and add them to the table in sheet2 and then I can save the workbook. The information in A1 to P1 is taken from other cells around the workbook. Once the information is in sheet 2 I can delete or change the informtion in sheet 1 without it affecting the copied information in sheet 2.
The next time I open the workbook I can enter the information in cells A1 to P1 on sheet1 then run the macro again and will then take the information and add it to the bottom of the table in sheet2 underneath the previous information that had been added - obviously the source of this information will now be deleted.
I will need to do this again and again building up the table in sheet2. The table will also use columns A to P like in sheet1.
I am looking for better way to copy formula and paste it to dynamic table (I don’t know how many rows there is at the table). The procedure takes long time for the user. (the table may contain more than 30,000 rows !!).
View 3 Replies View RelatedI would like to know if it's possible to copy a pivot table from one sheet and paste it into in another sheet such that two pivot tables are not linked i.e. if I create a calculated item in pivot table it doesn't show as an item in another. If yes, how could I do that?
View 1 Replies View RelatedI have a spreadsheet with macros and conditional formatting assigned to it. What I want is to be able to copy only the displayed contents, without the macros and formatting instruction, to a separate workbook for reporting purposes.
View 2 Replies View RelatedI have a problem in creating Pivot Table in the format that I want for the purpose of report, so I'm not even sure if I should use it at all.
In the file attached, I have a sample data source in sheet 'Source'. Basically the data are already in the list format.
For the purpose of reporting, I want to make this data in the format of sheet 'Final Format Wanted'. Note that the report only takes in data from columns D, M, N, O ( Headings highlighted in red).
(1) I understand that I can do something like this with a Pivot Table, and I already did something like it in the sheet 'Pivot'.
The Pivot table works well for Total Exposure (data from column M)The thing is, I want just the Grand Total Figures for column N and O instead of putting it in the data section itself. For better explanation, please take a look at sheet 'Final Format Wanted'. I just want the grand total for these 2 columns because they are less important and I want to be able to squeeze just the relevant figures for the report. Can I do this?
(2) Another way I have thought of is actually using a combination of Vlookup and concatenate function (look at sheet 'vlookup'). The thing is, some names that I used to concatenate might appear twice (look at row 39 and 40 in sheet 'Source' under column L), so if I am to use this, I'll need to find Sub-total first then copy and paste each item again into the format I wanted.
To me, this seems to be a really long way of doing it. Pivot Table is preferable in that it can count the total automatically for me, but I can't get the format I want.
Does anyone have any suggestion what I can do? If I use
(1)Pivot table - how can I get just the Grand Total of the other 2 columns?
(2)Vlookup - Is there a faster way in getting the subtotal and ultimately get the data in the format I want?