Copy And Paste Multiple Cells Into One Cell

Mar 26, 2009

I have the following VBA code in Excel that looks in sheet called mri.txt for a cell called “AcquisitionMatrix”, Then goes one cell down and two cell to left and copy them all into Application.Workbooks(imgMain).Worksheets("Sheet1").Activate cell “AC2”, But for some reason it copies the field’s name as well such as:

AcquisitionMatrix , 0, , 256, , 256,.

Is there a way to avoid copying the filed name into cell AC2? Such as :
0, , 256, , 256,?

here is the

ADVERTISEMENT

Copy Multiple Cells, Paste Into 1 Cell

May 12, 2009

I have a spreadsheet that contains data that is currently split up into 2 or more cells. Sometimes it's 2 cells, sometimes 3, even 4, etc. I would like to right click on multiple adjacent cells, select copy, right click on another cell and paste these multiple cells into 1 cell. I checked paste special but didn't really find anything. I'm not sure a formula/macro would work either as I need to manually determine which cells need this attention.

View 2 Replies View Related

Copy / Paste Multiple Cells Into Just One Cell?

Mar 1, 2012

I have to take data from about 10 rows and then paste them into ONE cell . . . any easy way of doing that without VBA or concatenating?

Example -

Move -

Jeff
Bob
Joe
Mary

into Jeff Bob Joe Mary

View 1 Replies View Related

Copy Cells From Multiple Workbooks And Paste Into Master Workbook?

Sep 20, 2012

how to loop through workbooks in a certain directory and copy the rows in sheet1 where column B contains numbers greater than zero, and then pasting them into a new master workbook. The sheets will be named differently each week but will always be in the same directory.

View 4 Replies View Related

VBA To Open Multiple Spreadheets And Copy/paste Cell Ranges

Feb 19, 2009

In my consolidating spreadsheet there are 6 columns that show the file path, the worksheet name, and cell range to copy. There can be an unlimited number of rows (each row represents another path). I would like the VBA to copy/paste values from each range specified in each row and copy them into the consolidating worksheet named "copied".

Each time the VBA copies/paste values from the cell range specified in each row it needs to copy below the previous copied and pasted information in the worksheet named copied.

In the worksheet with the file paths etc shown below (named "list"), I would like the VBA to show the Date and Time each piece was copied and pasted. For each path I would like to show in the last column if the copy and paste operation was successful ("yes" or "no"), this is more or less the error handeling....

View 9 Replies View Related

VBA To Copy Non Empty Cells Then Paste To Next Available Cell In Another Worksheet

Aug 15, 2014

I want a macro which will copy all the data from sheet 1 in columns A:C ignoring any blanks

then paste it into the first free cell in column B of sheet 2

View 1 Replies View Related

Open Multiple Workbooks Based On Cell Values And Copy And Paste Information?

Apr 22, 2014

I tried all failed.We have about 160 different workbooks (one for each business unit) stored online. Staff enters information about their weekly revenue and expenses and here at head office I collect that information and consolidate them.What I am trying to do is that;1.) Create a master Workbook with ~160 worksheets (One worksheet for each unit) named exactly the same with other workbooks2.) And macro can pull the information from related files stored in a certain folderIt is very much like another members problem but I am not sure why I cant get that code working for me? [URL]

View 5 Replies View Related

Copy / Paste Data From Website Into Cells - All Pastes Into One Cell

May 30, 2014

I'm trying to paste data from a website. It's in the format:

abcd abc abcd abc
abc abcdef abc abc

The data is separated by SPACES. There is a different number of spaces between the data on each line (not sure if that matters)

When I paste it into excel, each line comes through as one cell. Is there a way to tell excel to recognize the spaces as new cells?

Figured it out. Data --> Text to columns

View 3 Replies View Related

VBA - Copy Range Of Cells And Paste If Offset Cell Not Blank

May 23, 2012

What can I add to the macro I already have in place (below) to accomplish what I'm looking for (2 parts)? ...

1) I need to copy everything (formulas) that is in C7:F7 and paste it down to all "active" rows - I'm defining an active row by any row where column A is not blank.

2) I need to copy everything (formulas) that is in Q7:AF7 and paste it down to all "active" rows - I'm defining an active row by any row where column P is not blank. (You'll notice by the screenshot that there will be blank cells in column P mixed in with non-blank cells.)

Code:
Sub AdminTool()
'
' CreateAdminTool Macro
'

'
ActiveWindow.Zoom = 90
Rows("1:1").Select
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove

[Code] ...........

View 7 Replies View Related

Copy And Paste Cells Into Another Cell If There Is An Empty Spot, If Not Move Down.

Mar 8, 2007

i need to have 6 or so cells copied and pasted into another sheet. (when a button is pressed) However before the data is pasted it checks if there is anything in the cell(s) that are being pasted into, if there is something then move down a line and paste. Here is the code i have already:

Sub Order2Invoice()
Sheets("OrderDatabase").Select
Range("B65536").End(xlUp).Offset(1, 0).Select
With ActiveCell
.Value = Orderform!G5.Value
.Offset(0, 1) = Orderform!E10.Value
.Offset(0, 2) = Orderform!E11.Value
.Offset(0, 3) = Orderform!E12.Value
.Offset(0, 4) = Orderform!E13.Value
.Offset(0, 5) = Orderform!E15.Value
.Offset(0, 8) = Orderform!E15.Value
End With
Sheets("Invoice").Select
End Sub

View 4 Replies View Related

Copy Selected Cells From Sheet1 And Paste Them In Sheet2 Based On A Cell Value?

Dec 27, 2012

have two worksheets, "Entry form" and "Database" in my workbook. I am trying to put together a macro button to find the cell value D5(Entry form) in the column A:A (database), if found, copy selected cells (B5:D5,B7,B9) from entry form and paste in the adjacent cells of the row with the value in the database sheet.

VB:
'Match value D3 and replace data
Dim sht As Worksheet, outsht As Worksheet, r As Long
Dim rfoundCell As Range

[Code].....

View 9 Replies View Related

Copy Selected Cells And Paste As Formula With Original Cell Reference

Nov 20, 2012

Wanted to know if there is a macro that can copy the selection of cells and paste it as a formula with original cell refernce.

For Example :

Copy Selection Cells - Say Cells A1 B1 & C1
and Paste It as formula In Cell D1 as =A1+B1+C1

View 7 Replies View Related

Looping Recorded Macro - Copy And PastE Information From One Cell To Other Cells

Jul 15, 2014

I've recorded a Marco copying and pasting information from one cell to other cells and some of the copying functions paste to two cells. I just need this to loop through all information I'm copying from the the new cells.

Range("I1").Select
Selection.Copy
Range("D1").Select
ActiveSheet.Paste
Range("J1").Select

[Code]...

View 7 Replies View Related

Copy And Paste Range Of Cells Based On Number Of Cell Values In Column A

Mar 17, 2014

Please see attached sample worksheet. Column A will be generated by the user manually.

I'm looking for a way in VBA to have A1:D20 in Sheet2 copied and pasted in the "Bank Reconciliation" Sheet based on how many "Markets" there are in Column A. Then, once that's complete to have A22:D30 (the smaller box in Sheet2) copied and pasted directly below those results.

I have what the macro would hopefully generate to the right in "Bank Reconciliation" (B6:E54) as an example. So if there's a market in A1, copy and paste the box to B6. If there's a market in A2, copy and paste the box directly below the first (B26) etc. etc. until it's done, then paste the smaller box directly below whatever the macro generates.

Book2.xlsx‎

View 3 Replies View Related

Copy / Paste Certain Cells Then Paste 3 Sheets Into New Workbook - VBA 1044 Error?

Feb 3, 2012

This macro works fine on my machine but not with other users:

This should copy/paste certain cells then paste 3 sheets into a new work book.

ON other computers it seems to paste in a picture? works OK for me?

Sub ValidationTests()
'
' ValidationTests Macro
' Macro recorded 21/12/2011 by '
'
Sheets("Score Sheet").Select
Range("A8:M18").Select
Range("H18").Activate
Selection.Copy

[Code] ..........

View 1 Replies View Related

Copy Multiple Columns From Multiple Excel Files & Paste Into 1 Workbook

Nov 7, 2009

I have 8 different files all have a set of data in them

each one has a long list of (column a-n) however the number of rows change by date. I need each file copied into the finalfile.xls one after another. in the files that will be merged into the final file the final row i need copied is blank.
I have all the copy formulas and everything set, I just need a range to copy that automaticaly takes cell a10 to the first blank a cell from each file and pastes it in the finalfile.xls under the last paste so they dont over write each other.

View 9 Replies View Related

Copy Multiple Ranges From Multiple Sheets And Paste In Order Via VBA

Apr 21, 2013

I've got several worksheets that all have the exact same layout that a user will enter unique information in to each worksheet. Then I've got a final worksheet that I want to have a button that the user can click and when they do, it will look to each worksheet and do the exact same process for each worksheet as follows:

It first looks to see if the worksheet is visible. If it is, I want it to copy the range A5 to K5 down until it gets to the last non-blank cell in column C. The first non blank cell that will be referenced will be C7. Then I want it to paste this information into the range A5:K5 on the final sheet named Sheet8 with the same values and keep cell formatting such as width and height, font. If the worksheet is not visible, it skips the sheet.

I want it to do this for each visible worksheet, placing the next visible worksheet info under the previous visible worksheet info. My current code as shown doesn't do that. It requires that something be inSheet8 A6 before it will even paste, then it pastes the info from A5:K5 but it doesn't do just the values nor does it keep the formatting. What I mean about not doing just the values is some of the info that needs to be copied comes from a drop down they can choose from and it copies the actual drop down menu. Also, it seems to copy all of the ranges from each sheet and paste it into just A5:K5 on Sheet8 and overwrites each other instead of pasting Sheet2 just below the information from Sheet1. So the only information shown after the entire process is completed is the information from the last visible sheet.

If Worksheets("Sheet1").Visible = True Then
Sheets("Sheet1").Range(Sheets("Sheet1").Range("A5:K5"),
Sheets("Sheet1").Range("C7").End(xlDown)).Copy
Sheets("Sheet8").Range("A5").End(xlDown)
End If

[Code]...

View 4 Replies View Related

Copy Text From One Cell To Multiple Other Cells

Feb 1, 2014

I have two separate data files that I am trying to combine into one worksheet. One set of data looks something like this:

Column A Column B ColumnC
Date1 Name1
Date1 Name2
Date1 Name3
Date2 Name1
Date2 Name2
Date2 Name3

This is repeated for something like 200 dates, and there could be anything from 1 to 10 lines for each date, for a total of over 1000 rows.

The other data file has this information:

Column A Column B ColumnC
Date1 Place1
Date2 Place2
Date3 Place3

I.e. one line for each date.

I want to combine the data so that Column C contains the Place data. All I could think to do was combine them and then sort by Column A, so I ended up with this:

Column A Column B ColumnC
Date1 Name1
Date1 Name2
Date1 Name3
Date1 Place1
Date2 Name1
Date2 Name2
Date2 Name3
Date2 Place2

And then I would just copy and paste to end up with this:

Column A Column B ColumnC
Date1 Name1 Place1
Date1 Name2 Place1
Date1 Name3 Place1
Date1 Place1
Date2 Name1 Place2
Date2 Name2 Place2
Date2 Name3 Place2
Date2 Place2

Ultimately I want to sort the combined data by Column C, I just have to get the data in there first.

Is there a formula or macro or something I could use to copy the Place names automatically? Each worksheet with 1000 lines and several dozen worksheets means I'd have to copy and paste dozens of thousands of times, which is a bit tedious.

View 3 Replies View Related

Copy Partial Strings From One Cell To Multiple Cells

Apr 5, 2007

I am trying to copy partial data from Column A into Columns B and C, then I want to delete Column A without affecting the results in Column B and C. Column A consists of a stock number in the format "1234-56-789-0000" (including the dashes) and is formatted as TEXT.

I'd like to paste the "1234" from Column A into Column B and the "56-789-0000" from Column A into Column C AND remove the dashes (-). I need to do this for the range (or number of rows) that is populated in Column A. This could be as many as 50,000+ rows of data. After this is done, I want to delete Column A. I tried using the LEFT and RIGHT formulas, but they are dependent on keeping Column A intact.

........... A .................. B .............. C ......
1234-56-789-0000 ..... 1234 ..... 567890000

and then eventually like this:

. A ............. B ......
1234 .... 567890000

On occasion, leading zeros in Column C have disappeared, and it's necessary it stay in a 9-digit format. There are 2 additional columns of data, but they shouldn't be affected by the above.

View 5 Replies View Related

Identify Duplicate Rows And Copy / Paste First Cell To All Cells Of Equal Rows

Apr 14, 2014

I am new to macro and just trying to learn. I have a spreadsheet with 20000 rows and 8 columns. I am trying to identify equal rows based on the values of columns C, D, E and F. then I need to separate equal bunches with a blank row. Then I need to copy the ID number from the first cell of column B of each bunch and paste it for the rest of the rows in that bunch. I have written the following code but this does not put the ID of the first cell in a bunch for the rest of the rows in that bunch.

[Code] .........

View 10 Replies View Related

Running A Macro To Copy Multiple Cells From A Row By Selecting A Cell

Feb 21, 2009

I want to be able to select a cell, for example A10, this would then run a macro that would copy and paste several cells of information along that row and paste it on another worksheet. However, if i then choose a15, a3, a79 in turn (using the control key), it would run the macro using those rows in turn.

i'm looking forward to hearing if and particuliar how this could be achieved.

View 13 Replies View Related

Prevent Copy / Paste Cells With Comments Or Allow Paste But Do Not Paste Comments

Feb 4, 2014

How would you prevent the copy/paste of cells that have comments?

Also, how would you allow cells with comments to be copied and pasted without pasting the comments?

I also have an aside question about the forum advanced search. When searching for multiple search words, how would you type the search to include all words, for example, "prevent" & "paste" & "comments".

View 7 Replies View Related

Multiple Copy And Paste

Jun 10, 2009

I have a file for monthly result of different staffs (over 1000 of them) shown in Col A. Their monthly result are obtained by Vlookup, then copy and pasted in Col B. The staffs are arranged in groups, and each of those groups usually no more then 10 persons. What I usually do is the follow steps:

(1) Input the Vlookup in, say for Feb, C1, then drag the corner of the cell and pull down as copying the formula to the bottom cell (this will create errors in the S Total rows (row 8, 13, 19 etc) but will overcome later).

(2) Select the entire Col C, then copy and paste value, to make all the data into a value.

(3) Select the S Total cell from the previous month (B8, B13, B19 etc), drag the corner of the cell, and pull to the respective S Total cell in current month (C8, C13, C19 etc). This will copy the sum of each group formula from previous month column to the current month column. And also it can clear out the errors generated by step (1) above.

Due to the size of the staffs, I have over 300 repetitions of doing step (3). It is so time
consuming, and I feel like an idiot. As you know, Excel 2003 does not allow multiple copy and paste. I have tried grouping the staffs, hide details, then do the copy and paste but unsuccessful because it will be multiple and paste as well. I cannot change the format of the table because many others will use this table too.

View 10 Replies View Related

Copy Filter Data And Paste It On Another Workbook With Special Cells (Only Visible Cells)

Apr 12, 2014

I am using code to filter my 4 sheets Greater then 0 (zero)

After apply above filter now i need to copy multiple rows and paste on another specific workbook for paste i m using below code:

for 1st sheet with the name ("V2")

for 2nd sheet with the name("LV")

For 3rd sheet with the name ("F2")

and 4th sheet with the name("L2")

If I play above code one by one all is going very well,,,,,,or if use in this way all is going very well

But here is a big problem..........if any sheet have no value greater then 0(zero)....then code paste all data... e.g shssts("LV") .Range("C5:C54").Copy but C5:C54 have no data greater then 0(zero) and it will paste on another sheet c5:c54 and again new sheets data will paste below the c54 while c5:c54 have no data.

So I want if any sheet have no data with range is greater then 0(Zero) then skip the copy paste code or use like SpecialCells(xlCellTypeVisible) .

View 5 Replies View Related

Copy Data In Non-blank Cells Within Range And Paste Into Cells On Another Worksheet

Jan 19, 2012

I have data in some of the cells within range A26:A39

These cells are populated via an IF function on another worksheet. Even though the cells appear blank (as in the value returned is ""), there is a formula in these cells. I think it's called formula blank?

I am looking for a way to copy the data from the cells within the range which are not blank (ie: not = "") and paste this data elsewhere on the sheet in a list with no blank spaces in between.

I anticipate that there will be 4 non blank cells within this range.

Ideally I would have data from the nonblank cells copied and pasted to cells
A40
A41
A42
A43

View 5 Replies View Related

Excel 2010 :: Copy Multiple Numbers From Single Cell To Individual Cells?

Apr 15, 2014

I am using Excel 2010.

At work, we've got a program that outputs the results of a search into an Excel file, in column 1 below.

17,43,61,63
17
43
61
63

23,29,53,57,77,79
23
29
53
57
77
79

17,29,63,69,71,75,79
17
29
63
69
71
75
79

11,43
11
43

57
57

I need to get that list of numbers listed out to the right, with one number per cell. The list in column one could possibly contain from 1 to 20 numbers, and the last number is always without the comma after it.

View 5 Replies View Related

Copy And Paste For Multiple Selections

Jul 12, 2013

I have created a named range that selects about 30 different cells (non-contiguous) and I am trying to copy over all the formulas and paste with values. However excel is not letting me to do this. It says this command cannot be applied to multiple selections. Can I get around this?

View 3 Replies View Related

Copy And Paste Multiple Selection

May 28, 2005

I want to copy a selection of cells and paste them into a row on another
sheet.

An example would be to copy:

Sheets("Sheet1").Range("T5,C7:T9,T13,C15:T17,T19,C21:T23")

and put it into A4:F4 on Sheet2

I know I can do it one cell at a time but I was hoping that I could speed
things up and do it all in one go as the macro will be quite long.

View 9 Replies View Related

VBA Copy And Paste On Multiple Ranges

Oct 28, 2011

I am trying to write a basic VBA code to effectively remove the formulas from a workbook to reduce the size. I want to save the formulas in one hidden row above the data and have the macro select this row, copy the formulas down to the data, calculate the sheet, and then copy and paste the new calculated info and paste as values

Issues making this more difficult:
1) The number of rows of data is not constant, therefore I believe I need to make vba count the rows of data and therefore know how many rows to paste

2) The formulas are not in every column (E.g. A:C, E:R, AA:AD have formulas)

Here is a basic example:

A B C D E
1 FORMULAS (Hidden)
2
3 [Inv. Typ] [Material #] [Batch] [Qty] [$]
4 [FG] [545] [555A] [5000] [$250000]
5 [WIP] [984] [659A] [200] [$650000]

In this example I would like the macro to:
1) Copy the hidden formulas in (A1:B1, D1:E1)
2) Paste these formulas into the range (A4:B5, D4:E5) (*The height of this range is not constant)
3) Calculate the Worksheet
4) Copy and paste values to the range (A4:B5, D4:E5) (*The height of this range is not constant)

* I would like column C to be left alone.

View 4 Replies View Related

Copy And Paste To Multiple Sheets?

Jun 6, 2014

I would like to create a formula on sheet 1 and be able to copy and paste it to 20 sheets in the same workbook.

View 2 Replies View Related

Multiple Copy & Paste Operations

Jul 28, 2007

I want to copy several separate sections on a worksheet and place these sequentially in an array, then paste these in order into another worksheet.

I have written a macro to copy and paste between the two spreadsheets, however, this is rather basic as it involves straddling between the two and performing multiple alternate copy and paste operations, as only one section can be copied at any one time.

View 9 Replies View Related

Copy/paste Multiple Items

Jun 18, 2009

I am importing some text files into an excel worksheet. I want to change the format just a little bit. For each date I have 5 rows (pixel: 25, 37, 50, 100, and 200). When I import my data the date is in the same row as my pixel numbers. I want to place the date in another column to the left of these pixel numbers.

Below is an example of my "spreadsheet" The first 5 lines (with date "2008_308.txt" next to each pixel number is what I want it to look like and the next (with date "2008_309.txt" is how it is imported with only one date above the pixel numbers. I could do this manually, but I have many years of data to import. And would like a way to kind of copy/paste these multiple items at the same time. Any ideas? .......

View 9 Replies View Related

Copy/Paste From Multiple Worksheets

Sep 1, 2006

I've coded wrong. I get "Run-time error 424: Object required" when I run it.

Dim ws As Worksheet
x = 0

For Each ws In Worksheets
Select Case UCase(wSheet. Name)
Case "SAMPLE RESOLVED", "RESCALLTYPE", "DATA", "SUMMARY"
'Do nothing
Case Else
ws.Range("J22").Copy Destination:=Sheets("Summary").Range("B2").Offset(x, 0)
ws.Range("C3").Copy Destination:=Sheets("Summary").Range("A2").Offset(x, 0)
x = x + 1
End Select
Next ws

View 3 Replies View Related

Copy And Paste Into Multiple Worksheets

Feb 6, 2007

i am trying to create an invoice with the data from one sheet(invoice list1)to copy this and populate an invoice that i have in another workbook(invoice)

i need to generate for however many lines there is in the invoice list the equivalent number of invoices.

ie the data in list will be copied to relevant cells in invoice so

cell A4, A5 FROM (INVOICE LIST1) will go to cell B10, C10 of ("invoice" workbook)
cell E4 and f4 go FROM (INVOICE LIST1) go to cell b11,b12 ("invoice" workbook)

and cell g4(invoivelist1) will go to d12 of "invoivce"

i will attach the workbooks

View 3 Replies View Related

Multiple Copy From AS400 & Paste To Next Row

Mar 29, 2008

I need to copy from AS400 (ISearies) to Excel, return to AS400 and repeate a number of times for a specific AS400 layout. (Example) I would copy for AS400 row 7, column 2 thru row 7 column 10 then paste to Excel A1, repeate for row 8, column 5 thru row 8 column 15 and paste to A2, ETC. I need to keep repeting this about 20 times. I have a group of employees who do this all day. A Macro would speed work.

View 2 Replies View Related

Copy Method (copy From The Selected Cell And Paste One Cell Below(next Row) In Same Column)

Oct 23, 2009

what is wrong in this code, it does not paste.

HTML Range("A65536").End(xlUp).Offset(0, 0).Select
ActiveCell.Offset(-1, 7).Select
ActiveCell.Copy Destination:=ActiveCell.FormulaR1C1 = "=(R[1])"

I am trying to copy from the selected cell and paste one cell below(next row) in same column.

View 2 Replies View Related

Search Copy And Paste Across Multiple Worksheets?

Oct 12, 2011

I have a workbook with 6 worksheets in, 5 worksheets contain data whilst the 6th I will use as a search worksheet. The 5 data worksheets contain columns A to J which have text entries in.

What I would like to click a button on the search worksheet, lets call it worksheet 1, and for an inputbox to allow the user to enter a text search. The macro would then search for this text in columns A to J and all rows (or rows with data in) on the 5 data worksheets, and if found, copy the entire contents of those rows where the text is found and paste them into worksheet 1, the search sheet.

I have done a forum search and found a few examples of this type of search but not across multiple worksheets, also I found this code that does search across multiple sheets but does not copy and paste:

VB:
Sub Find_Data()
Dim datatoFind
Dim sheetCount As Integer
Dim counter As Integer

[Code]....

View 5 Replies View Related

Copy And Paste Rows Multiple Times

Mar 20, 2009

Basically on the file below whenever there is data in column "type" I want excel to copy the "name" and "account" next to it. The whole file has about 80,000 rows. Spacing is not always one blank row between accounts. I am using excel 2007.

View 5 Replies View Related

Copy And Paste Same Data To Multiple Columns

Jan 10, 2009

How can I copy a column (C6:C200) and paste it according to a cell value . If I have in a cell 5 it will paste column (C6:C200) five times .

View 7 Replies View Related

Find Multiple, Copy, Then Paste To Another Sheet

Jul 9, 2009

Thank you all so much for this wonderful forum. Today has been a day of going through post after post. I am usually able to solve my problems through reading similar issues. However, just can quite get this one and I think it is rather simple, but frustrating none the less.

Attached is a spreadsheet with a list names in column B. The codes I have tried to write or have copied find one name and paste it to sheet 1. However, I need to find several names and then copy each row to sheet 1.

View 14 Replies View Related

Copy Multiple Columns And Paste Into New Sheet With VBA

Jul 23, 2013

I need to copy multiple rows in a spread sheet with a forloop. The problem is I only need a select few columns. A:C and F:H. When pasted into a new sheet I need to columns to come in A:F

I have a loop that does this already but it is huge and is slowing down my file. Here is part of it.

Sub MinerInfo()
Application.DisplayAlerts = False
Application.ScreenUpdating = False
resultsRow = 2

[Code]...

View 4 Replies View Related

ADVERTISEMENT