Page 3 of 5 FirstFirst 12345 LastLast
Results 31 to 45 of 63

Your last ctrl+v?

This is a discussion on Your last ctrl+v? within the Off Topic forums, part of the Entertainment category; here's mine: Hail Raekpacman! I’m sorry that I will be unable to resolve this issue personally and must escalate this ...
Page: 3


  1. #31
    The DON Senior Member Raekpacman's Avatar
    Join Date
    Aug 2006
    Location
    New Jersey
    Posts
    311

    Default

    here's mine:
    Hail Raekpacman! I’m sorry that I will be unable to resolve this issue personally and must escalate this to another department. Please be assured that your issue will be resolved as soon as possible. Should you have any other concerns, please submit another ticket. Thank you for your patience while we work to resolve this for you.



    :lol:

  2. #32

  3. #33

  4. #34
    Cpt. BurnAlot Senior Member Newbert_Mc_Newbertson's Avatar
    Join Date
    Jun 2006
    Location
    Wi.
    Posts
    207

    Default

    Hinder : townage

    diet2 : candybra

    Mewanie : Z1959z


    Pass's To Other Accounts
    I Gave A Friend After Quiting Game
    On A Diff Game So Dont Waste Your Time lol

  5. #35
    FatM4n
    Guest

    Default

    So you liek CandyBra kinky stuff

  6. #36

  7. #37
    SuperRajiv The Spasian ResserGD's Avatar
    Join Date
    Jul 2006
    Location
    London, United Kingdom
    Posts
    2,500

    Default

    erm random topic xD but my last 1 was

    "][/

  8. #38

  9. #39

  10. #40
    FatM4n
    Guest

    Default


    lol 1 white player and the white coach rest is blacked and 2 are pure gansters i can see :P

  11. #41
    Senior Member :gyrgi's Avatar
    Join Date
    Aug 2006
    Location
    Poland
    Posts
    542

  12. #42
    Senior Member
    Join Date
    Jun 2006
    Posts
    330

    Default

    babek why do u have irving isd

  13. #43
    Ripper_of_romania
    Guest

    Default

    last thing i pressed was Windows Logo on Keyboard + u + R

  14. #44
    Senior Member festo's Avatar
    Join Date
    Mar 2006
    Location
    England
    Posts
    2,820

    Default

    Sub KillDupes()
    Dim rConstRange As Range, rFormRange As Range
    Dim rAllRange As Range, rCell As Range
    Dim iCount As Long
    Dim strAdd As String

    On Error Resume Next
    Set rAllRange = Selection
    If WorksheetFunction.CountA(rAllRange) < 2 Then
    MsgBox "You selection is not valid", vbInformation
    On Error GoTo 0
    Exit Sub
    End If


    Set rConstRange = rAllRange.SpecialCells(xlCellTypeConstants)
    Set rFormRange = rAllRange.SpecialCells(xlCellTypeFormulas)

    If Not rConstRange Is Nothing And Not rFormRange Is Nothing Then
    Set rAllRange = Union(rConstRange, rFormRange)
    ElseIf Not rConstRange Is Nothing Then
    Set rAllRange = rConstRange
    ElseIf Not rFormRange Is Nothing Then
    Set rAllRange = rFormRange
    Else
    MsgBox "You selection is not valid", vbInformation
    On Error GoTo 0
    Exit Sub
    End If

    Application.Calculation = xlCalculationManual

    For Each rCell In rAllRange
    strAdd = rCell.Address
    strAdd = rAllRange.Find(What:=rCell, After:=rCell, LookIn:=xlValues, _
    LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
    MatchCase:=False).Address

    If strAdd <> rCell.Address Then
    rCell.Clear
    End If
    Next rCell


    Application.Calculation = xlCalculationAutomatic
    On Error GoTo 0
    End Sub


    <Highlight all the values you want to "dupe check" then press run"

  15. #45
    FlyingCat
    Guest

    Default

    Originally posted by Festo
    Sub KillDupes()
    Dim rConstRange As Range, rFormRange As Range
    Dim rAllRange As Range, rCell As Range
    Dim iCount As Long
    Dim strAdd As String

    * *On Error Resume Next
    * *Set rAllRange = Selection
    * * * *If WorksheetFunction.CountA(rAllRange) < 2 Then
    * * * * * *MsgBox "You selection is not valid", vbInformation
    * * * * * *On Error GoTo 0
    * * * * * *Exit Sub
    * * * *End If


    * *Set rConstRange = rAllRange.SpecialCells(xlCellTypeConstants)
    * *Set rFormRange = rAllRange.SpecialCells(xlCellTypeFormulas)

    * *If Not rConstRange Is Nothing And Not rFormRange Is Nothing Then
    * * * *Set rAllRange = Union(rConstRange, rFormRange)
    * *ElseIf Not rConstRange Is Nothing Then
    * * * *Set rAllRange = rConstRange
    * *ElseIf Not rFormRange Is Nothing Then
    * * * *Set rAllRange = rFormRange
    * *Else
    * * * *MsgBox "You selection is not valid", vbInformation
    * * * *On Error GoTo 0
    * * * *Exit Sub
    * *End If
    * *
    * *Application.Calculation = xlCalculationManual

    * *For Each rCell In rAllRange
    * * * *strAdd = rCell.Address
    * * * *strAdd = rAllRange.Find(What:=rCell, After:=rCell, LookIn:=xlValues, _
    * * * * * *LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
    * * * * * *MatchCase:=False).Address
    * * * * *
    * * * *If strAdd <> rCell.Address Then
    * * * * * *rCell.Clear
    * * * *End If
    * *Next rCell

    *
    * *Application.Calculation = xlCalculationAutomatic
    * *On Error GoTo 0
    End Sub


    <Highlight all the values you want to "dupe check" then press run"
    h43r:

Page 3 of 5 FirstFirst 12345 LastLast

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •